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内 容 简介 


本 书 由 浅 入 深 、 循序 渐进 地 向 读者 介绍 了 Visual C++ 网 络 编程 的 基础 知识 , 并 且 在 此 基础 上 讲解 了 常 
见 的 Visual C++ 网 络 编程 技术 及 典型 应 用 案例 ,最终 使 读者 从 根本 上 提高 自身 的 编程 水 平 , 能 够 独立 开发 
网 络 应 用 程序 。 本 书 内 容 包括 网 络 编程 基础 知识 、Socket 套 接 字 编程 基础 、 多 线程 技术 、FTP 浏览 器 实例 
程序 、 网 页 浏览 器 实例 程序 、 网 络 通信 器 、 邮 件 收发 器 、 实 用 播放 器 、 网 络 文件 传输 器 、P2P 网 络 播放 器 、 
Q 版 聊天 软件 的 实现 串口 通信 技术 等 。 本 书 最 后 专门 讲解 了 如 何 用 Visual C++ 实现 发 送 手机 短信 的 案例 ， 
其 中 具体 讲解 了 串口 通信 编程 的 实现 方法 、 所 需要 的 硬件 设备 以 及 数据 封装 等 知识 。 

本 书 配套 光盘 中 提供 了 作者 专门 为 本 书 录制 的 多 媒体 语音 教学 视频 和 本 书 所 涉及 的 源 代码 ， 这 些 源 
代码 都 经 过 精心 调试 ， 在 Windows XP 和 Windows 2003 下 测试 通过 。 

本 书 适合 广大 用 Visual C++ 进行 网 络 程序 开发 的 人 员 和 想 进 一 步 提升 网 络 编程 水 平 的 人 员 阅 读 , 尤其 
适合 具有 一 定 C 语言 基础 和 C++ 语言 基础 的 人 员 或 大 中 专 院 校 的 学 生 阅 读 。 
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随 着 计算 机 的 广泛 应 用 和 网 络 的 普及 ， 人 们 的 生活 和 工作 与 网 络 的 联系 越 来 越 紧密 。 
最 初 ， 各 式 各 样 的 网 站 为 大 家 提供 各 项 服务 。 随 着 网 络 应 用 的 深入 ， 各 种 网 络 应 用 软件 也 
层出不穷 。 从 腾讯 的 QQ， 到 迅雷 下 载 工 具 ， 再 到 各 种 视频 网 站 播放 软件 ， 每 个 应 用 软件 
都 成 为 人 们 生活 不 可 或 缺 的 一 部 分 。 

由 于 微软 操作 平台 Windows 的 广泛 应 用 , Windows 网 络 技术 受到 越 来 越 多 的 公司 和 技 
术 人 员 青 睐 。 为 了 方便 大 家 更 好 地 学 习 Windows 网 络 编程 技术 ,笔者 花费 一 年 时 间 来 编写 
本 书 。 在 写作 期 间 ， 征 询 很 多 网 友 的 意见 ， 几 次 易 稿 。 本 书 删 减 大 量 篇 幅 的 协议 分 析 讲 解 ， 
只 保留 最 核心 的 部 分 。 为 了 帮助 大 家 更 快 进入 开发 ,大 幅 扩 充实 际 应 用 开发 的 内 容 。 在 此 ， 
对 这 些 网 友 表 示 深 深 的 感谢 。 


本 书 特色 


1. 由 浅 入 深 ， 循 序 渐进 


为 了 方便 读者 学 习 ， 本 书 首先 从 C/S 网 络 模型 等 网 络 编程 基础 知识 开始 向 读者 讲解 。 
并 在 读者 不 断 学 习 的 过 程 中 ， 引 进 新 的 知识 点 ， 鼓 励 读者 独立 修改 各 章 中 的 实例 程序 。 从 
而 使 读者 可 以 边 学 习 ， 边 动手 ， 更 快 地 掌握 VC++ 网 络 编程 知识 。 


2. 按 知识 点 进行 讲解 ， 理 解 深刻 


由 于 VC++ 的 相关 技术 较 多 ， 因 此 很 多 读者 都 感觉 无 从 下 手 。 本 书 通过 按照 知识 点 进 
行 讲解 的 方式 ， 帮 助 读者 解决 这 个 问题 。 本 书 在 第 1 篇 中 着 重 讲解 了 网 络 编程 基础 知识 以 
及 利用 多 线程 实现 异步 套 接 字 编程 的 方法 ， 使 读者 具备 网 络 编程 相关 的 基础 知识 。 在 第 2 
篇 中 ， 通 过 对 各 个 网 络 实例 程序 的 学 习 ， 读 者 可 以 对 利用 Visual C++ 6.0 进行 网 络 程序 的 
开发 过 程 以 及 各 种 方法 有 更 深入 的 理解 。 


3. 案例 精 讲 ， 深 入 剖析 


根据 笔者 的 项 目 实践 经 验 ， 不 同 的 软件 系统 开发 ， 其 技术 实现 原理 都 是 相似 的 ， 即 一 
通 百 通 。 所 以 本 书 没有 像 其 他 书籍 一 样 对 同一 个 知识 点 进行 重复 讲解 。 本 书 选 取 最 典型 
的 实例 一 一 串口 通信 编程 应 用 ， 向 读者 进行 综合 讲解 。 首 先 ， 在 第 12 章 中 ， 对 串口 通信 
方面 的 基础 知识 进行 详细 讲解 ， 使 读者 准确 掌握 串口 通信 的 基础 知识 。 然 后 ， 在 第 13 一 14 
章 中 ， 通 过 串口 API 函数 以 及 MFC 串口 控件 进行 实例 程序 的 编号， 向 读者 讲解 两 种 方法 
的 优点 。 
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4. 配 多 媒体 语音 教学 视频 光盘 


笔者 专门 为 本 书 录制 了 大 量 的 多 媒体 语音 教学 视频 ， 以 让 读者 更 加 直观 地 理解 本 书 内 
容 ， 提 高 学 习 效 率 。 另 外 ， 本 书 的 配 书 光盘 中 提供 了 本 书 涉及 的 实例 源 程序 ， 以 方便 读者 
使 用 。 


5. 提供 技术 支持 


为 了 方便 读者 学 习 ， 本 书 提供 技术 论坛 http://www.wanjuanchina.net。 如 果 读 者 在 学 习 
中 遇 到 什么 问题 ， 可 以 将 这 些 问题 发 布 在 论坛 中 ， 我 们 会 帮助 大 家 及 时 解决 这 些 问题 。 另 
外 ， 读 者 也 可 以 发 邮件 到 bookservice2008@163.com 获得 技术 支持 。 


本 书 内 容 


第 1 章 : 如 果 读 者 还 是 初学 者 ， 那 么 在 本 章 中 ， 读 者 将 学 习 到 什么 是 OSI 七 层 模型 等 
网 络 编程 中 常用 的 几 种 网 络 模型 结构 及 其 意义 ， 并 且 还 可 以 学 习 到 MFC 中 相关 的 网 络 套 
接 字 类 等 。 

第 2 章 : 详细 讲解 了 网 络 套 接 字 的 寻 址 方式 和 字 节 传输 顺序 ， 并 介绍 了 相关 的 Socket 
函数 。 根 据 网 络 传输 协议 的 不 同 ， 并 结合 实例 程序 分 别 向 读者 介绍 了 TCP 和 UDP 这 两 种 
常用 的 网 络 协议 的 编程 流程 。 

第 3 章 : 主要 向 用 户 讲解 多 线程 技术 的 基础 知识 以 及 实现 方法 ， 并 以 此 为 基础 进一步 
向 读者 讲解 实现 异步 套 接 字 编程 的 方法 及 其 技巧 。 

第 4 章 : 详细 讲解 了 FTP 浏览 器 的 工作 原理 及 其 常用 命令 等 相关 知识 ， 并 向 读者 介绍 
了 连接 、 登 录 FTP 服务 器 的 命令 、 编 程 方法 。 在 本 章 最 后 ， 通 过 创建 FTP 的 客户 端 实例 程 
序 ， 向 读者 综合 讲解 了 FTP 编程 的 编程 技巧 等 。 

第 5 章 : 着 重 向 读者 介绍 了 网 页 浏览 器 的 工作 原理 以 及 HTTP 请 求 和 响应 知识 。 通 过 
制作 浏览 器 的 个 性 化 界面 , 向 读者 介绍 了 工具 栏 的 编程 技巧 以 及 实现 方法 。 最 后 , 在 VC++ 
中 通过 创建 实例 程序 ， 向 读者 讲解 了 编程 步骤 等 。 

第 6 章 : 向 读者 讲解 了 通信 程序 的 通信 原理 。 通 过 发 送 端 和 接收 端 程序 的 实例 讲解 ， 
向 读者 分 别 介绍 了 通信 双方 的 编程 技巧 以 及 套 接 字 编 程 的 实现 方法 。 

第 7 章 : 首先 向 读者 介绍 了 通过 API 函数 直接 调用 Windows 自 带 的 邮件 收发 器 程序 ， 
并 详细 讲解 了 CreateProcess0 函 数 的 使 用 方法 。 在 本 章 中 ， 还 向 读者 介绍 了 SMT?P 会 话 的 
整个 过 程 。 最 后 ， 综 合 前 面 所 讲 的 知识 实现 了 邮件 收发 器 的 实例 程序 。 

第 8 章 : 向 读者 讲解 了 网 络 文件 传输 器 的 实现 原理 及 其 编程 方法 。 通 过 编写 服务 器 端 
和 客户 端 程序 分 别 向 读者 讲解 双方 的 实现 方法 ， 并 且 对 代码 进行 了 详细 的 分 析 。 

第 9 章 : 通过 编写 播放 器 实例 程序 ， 向 用 户 讲解 了 在 MFC 中 实现 消息 映射 的 方法 ， 
使 读者 对 MFC 框架 程序 的 工作 原理 有 了 进一步 的 认识 。 并 通过 多 线程 通信 和 多 媒体 控制 
函数 向 读者 讲解 了 播放 器 实例 程序 的 编写 方法 。 最 后 ， 还 向 读者 着 重 讲 解 了 如 何 实现 播放 
器 程序 的 搜索 功能 。 

第 10 章 : 主要 向 读者 介绍 了 当今 流行 的 P2P 流 媒体 技术 及 其 网 络 模型 。 通 过 向 程序 
界面 中 添加 播放 MP3 文件 的 功能 向 读者 介绍 了 如 何 进行 界面 的 美化 以 及 实现 方法 。 在 本 章 
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中 ， 着 重 向 读者 讲解 进行 P2P 通信 的 双方 如 何 实现 数据 传输 和 控制 。 

第 11 章 : 通过 读者 熟悉 的 Q 版 界面 编程 方法 向 读者 介绍 界面 中 各 个 控件 的 使 用 等 。 
在 本 章 中 ， 封 装 了 自 定义 的 通信 数据 类 Cdata， 并 使 用 该 自 定义 类 进行 本 章 实例 程序 的 
编写 。 

第 12 章 : 在 本 章 中 ， 着 重 向 读者 介绍 串口 通信 的 基础 知识 。 通 过 本 章 的 学 习 ， 读 者 
对 于 串口 通信 编程 会 有 一 个 比较 清晰 地 知识 结构 ， 对 于 后 面 深 入 学 习 串 口 编程 会 起 到 很 好 
的 作用 。 

第 13 章 : 在 本 章 中 ， 结 合 第 12 章 所 介绍 的 串口 基础 知识 ， 向 读者 分 别 讲解 了 如 何 使 
用 MFC 串口 控件 和 串口 API 函数 进行 编程 实现 串口 实例 应 用 的 方法 和 实现 过 程 。 其 中 ， 
对 实现 过 程 中 所 使 用 的 数据 结构 等 进行 了 非常 细致 的 讲解 。 

第 14 章 : 通过 前 面 所 有 章节 的 知识 进行 综合 , 通过 短信 猫 实现 VC++ 发 送 手机 短信 的 
实例 程序 。 在 本 章 中 ， 主 要 是 使 读者 感受 开发 综合 项 目 ， 使 其 达到 实战 的 效果 。 


适合 阅读 本 书 的 读者 


口 具备 C、C++ 等 计算 机 语言 基础 的 初学 者 。 

口 具有 一 定编 程 经 验 的 初 、 中 级 用 户 。 

口 自学 VC++ 网 络 编程 的 大 中 专 学 生 。 

口 对 于 VC++ 网 络 编程 感 兴趣 的 社会 培训 用 户 等 。 


本 书 作 者 及 编 委 会 成 员 


本 书 主要 由 梁 伟 编写 。 其 他 参与 编写 和 资料 整理 的 人 员 有 陈 世 琼 、 陈 欣 、 陈 智敏 、 董 
加 强 、 范 礼 、 郭 秋 河 、 部 红 英 、 薪 春 蕾 、 黎 华 、 刘 建 准 、 刘 雷 、 刘 亚军 、 刘 仲 义 、 柳 刚 、 
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英 、 杨 艳 、 余 月 、 岳 富 军 、 张 健 和 张 娜 。 在 此 一 并 表示 感谢 。 
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第 1 章 Visual C++ 网 络 编程 概述 


Visual C++《〈 后 面 简写 为 VC) 网 络 编程 是 指 用 户 使 用 MFC 类 库 〈 微 软 基 础 类 库 ) 在 
VC 编译 器 中 编写 程序 ， 以 实现 网 络 应 用 。 用 户 通过 VC 编程 实现 的 网 络 软件 可 以 在 网 络 
中 不 同 的 计算 机 之 间 互 传 文件 、 图 像 等 信息 。 本 章 将 向 用 户 介绍 基于 Windows 操作 系统 的 
网 络 编程 基础 知识 ， 其 开发 环境 是 VC。 在 VC 编译 器 中 ， 使 用 Windows Socket 进行 网 络 
程序 开发 是 网 络 编程 中 非常 重要 的 一 部 分 。 


1.1 网 络 基础 知识 


如 果 用 户 要 进行 VC 网 络 编程 ， 则 必须 首先 了 解 计算 机 网 络 通信 的 基本 框架 和 工作 原 
理 。 在 两 台 或 多 台 计 算 机 之 间 进 行 网 络 通信 时 ， 其 通信 的 双方 还 必须 遵循 相同 的 通信 原则 
和 数据 格式 。 本 节 将 向 用 户 介绍 OSI 七 层 网 络 模型 、TCP/IP 协议 以 及 C/S 编程 模型 。 


1.1.1 OSI 七 层 网 络 模型 
OSI 网 络 模型 是 一 个 开放 式 系统 互联 的 参考 模型 。 通 过 这 个 参考 模型 ， 用 户 可 以 非常 


直观 地 了 解 网 络 通信 的 基本 过 程 和 原理 。OSI 参考 模型 如 图 1.1 所 示 。 
发 送信 息 的 接收 信息 的 
计算 机 计算 机 


7. 应 用 层 


6. 表 示 层 6. 表 示 层 


i 各 层 数据 
5. 会 话 层 对 等 通信 


GG 
对 嵌 京 瑟 普 订 注 汪 


4. 数据 传输 层 4 数据 传输 层 
3. 网 络 层 

2. 数据 链 路 层 2. 数据 链 路 层 
1. 物理 硬件 层 1. 物理 硬件 层 


数据 传输 方向 
1.1 OSI 七 层 网 络 模型 
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用 户 从 OSI 网 络 模型 可 以 很 直观 地 看 到 ， 网 络 数据 从 发 送 方 到 达 接 收 方 的 过 程 中 ， 数 
据 的 流向 以 及 经 过 的 通信 层 和 相应 的 通信 协议 。 事 实 上 在 网 络 通信 的 发 送 端 ， 其 通信 数据 
每 到 一 个 通信 层 ， 都 会 被 该 层 协议 在 数据 中 添加 一 个 包头 数据 。 而 在 接收 方 恰 好 相反 ， 数 
据 通过 每 一 层 时 都 会 被 该 层 协议 剥 去 相应 的 包头 数据 。 用 户 也 可 以 这 样 理解 ， 即 网 络 模型 
中 的 各 层 都 是 对 等 通信 。 在 OSI 七 层 网 络 模型 中 , 各 个 网 络 层 都 具有 各 自 的 功能 ,如 表 1.1 
所 示 。 


表 1.1 各 网 络 层 的 功能 


协议 层 名 功能 概述 
物理 硬件 层 表示 计算 机 网 络 中 的 物理 设备 。 常 见 的 有 计算 机 网 卡 等 
数据 链 路 层 将 传输 数据 进行 压缩 与 加 压缩 
网 络 层 将 传输 数据 进行 网 络 传输 
数据 传输 层 进行 信息 的 网 络 传输 
会 话 层 建立 物理 网 络 的 连接 
表示 层 将 传输 数据 以 某 种 格式 进行 表示 
应 用 层 应 用 程序 接口 


外 注意 : 在 表 1.1 中 列 出 了 OSI 七 层 网 络 模型 中 各 层 的 基本 功能 概述 。 用 户 根据 这 些 基本 
的 功能 概述 会 对 该 网 络 模型 有 一 个 比较 全 面 的 认识 。 


应 用 层 
1.1.2 TCP/IP 协议 
数据 传输 层 
TCP/IP 协议 实际 上 是 一 个 协议 簇 ， 其 包括 了 很 多 协议 。 
例如 ，FTP (文本 传输 协议 ) 、SMTP〔 邮 件 传输 协议 ) 等 应 网 络 层 
用 层 协 议 。TCP/IP 协议 的 网 络 模型 只 有 4 层 ， 包括 数据 链 路 数据 链 路 层 


层 、 网 络 层 、 数 据 传输 层 和 应 用 层 ， 如 图 1.2 所 示 。 
在 TCP/IP 网 络 编程 模型 中 ， 各 层 的 功能 如 表 1.2 所 示 。 ”图 1.2 TCP/IP 网 络 协议 模型 
表 1.2 TCPIIP 网 络 协议 各 层 功能 


协议 层 名 功能 概述 

数据 链 路 层 网 卡 等 网 络 硬件 设备 以 及 驱动 程序 

网 络 层 下 协 议 等 互联 协议 

数据 传输 层 为 应 用 程序 提供 通信 方法 ， 通 常 为 TCP、UDP 协议 
应 用 层 负责 处 理应 用 程序 的 实际 用 于 层 协 议 


在 数据 传输 层 中 ， 包 括 了 TCP 和 UDP 协议 。 其 中 ，TCP 协议 是 基于 面向 连接 的 可 靠 
的 通信 协议 。 其 具有 重 发 机 制 , 即 当 数据 被 破坏 或 者 丢失 时 , 发 送 方 将 重 发 该 数据 。 而 UDP 
协议 是 基于 用 户 数据 报 协议 ， 属 于 不 可 靠 连接 通信 的 协议 。 例 如 ， 当 用 户 使 用 UDP 协议 发 
送 一 条 消息 时 ， 并 不 知道 该 消息 是 否 已 经 到 达 接 收 方 ， 或 者 在 传输 过 程 中 数据 已 经 丢失 。 
但 是 在 即时 通信 中 ，UDP 协议 在 对 一 些 对 时 间 要 求 较 高 的 网 络 数据 传输 方面 有 着 重要 的 
作用 。 
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1.1.3 ”C/S 编程 模型 


C/S 编程 模型 是 基于 可 靠 连接 的 通信 模型 。 在 通信 的 双方 必须 使 用 各 自 的 瑟 地 址 以 及 
端口 进行 通信 。 和 否则 ， 通 信 过 程 将 无 法 实现 。 通 常情 况 下 ， 当 用 户 使 用 C/S 模型 进行 通信 
时 ， 其 通信 的 任意 一 方 称 为 客户 端 ， 则 另 一 方 称 为 服务 器 端 。 

服务 器 端 等 待 客户 端 连 接 请 求 的 到 来 ， 这 个 过 程 称 为 监听 过 程 。 通 常 ， 服 务 器 监听 功 
能 是 在 特定 的 也 地 址 和 端口 上 进行 。 然 后 ， 客 户 端 向 服务 器 发 出 连接 请 求 ， 服 务 器 响应 该 
请 求 则 连接 成 功 。 否 则 ， 客 户 端的 连接 请 求 失败 。C/S 编程 模型 如 图 1.3 所 示 。 


向 服务 器 发 出 连接 请 求 


服务 器 应 答 客户 端 请 求 


服务 器 | ee | 客户 端 


客户 端 关闭 与 服务 器 之 间 
的 连接 


图 1.3 C/S 编程 模型 


由 于 客户 端 连接 服务 器 时 , 需要 使 用 服务 器 的 他 地 址 和 监听 端口 号 才能 完成 连接 。 所 
以 , 服务 器 的 也 地址 和 端口 必须 是 固定 的 。 在 这 里 ， 向 用 户 介绍 部 分 协议 所 使 用 的 端口 号 
码 。 例 如 ，HTTP 协议 (网 页 浏览 服务 ) 所 使 用 的 端口 号 为 80，FTP 协议 文本 传输 ) 所 
使 用 的 端口 号 是 21。 


外 注意 : 用 户 在 实际 编程 中 ， 通 信 双 方 的 连接 以 及 数据 通信 均 是 基于 Socket ( 套 接 字 ) 进 
行 的 。 


1.2 ”网络 编程 基础 


网 络 应 用 程序 可 以 使 用 MFC 中 封装 的 套 接 字 类 进行 编程 ， 也 可 以 使 用 Windows API 
函数 进行 程序 开发 。 相 比较 而 言 , MFC 网 络 编程 较 简单 一 点 , 用户 使 用 也 非常 方便 。 但 是 ， 
使 用 MFC 相关 类 编程 会 使 用 户 对 网 络 通信 中 的 基本 原理 没有 清晰 的 认识 。 而 使 用 Windows 
API 函数 则 恰好 相反 ， 可 以 使 用 户 熟悉 网 络 通信 的 基本 原理 。 
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1.2.1 Sockets 套 接 字 


用 户 在 Windows 中 编写 网 络 通信 程序 时 ， 需 要 使 用 Windows Sockets (Windows 套 接 
字 ) 。 与 Windows 套 接 字 相 关 的 API 函数 称 为 Winsock 函数 。 

在 网 络 通信 的 双方 , 均 有 各 自 的 套 接 字 , 并 且 该 套 接 字 与 特定 的 瑟 地 址 和 端口 号 相关 
联 。 通常 ， 套 接 字 主要 有 两 种 类 型 ， 分 别 是 流 式 套 接 字 (SOCK_STREAM) 和 数据 报 套 接 
字 (SOCK_DGRAM) 。 其 中 ， 流 式 套 接 字 是 专门 用 于 使 用 TCP 协议 通信 的 应 用 程序 中 ， 
而 数据 报 套 接 字 则 是 专门 用 于 使 用 UDP 协议 进行 通信 的 应 用 程序 中 。 


1.2.2 ”网 络 字 节 顺序 


网 络 字 节 顺 序 是 指 TCP/IP 协议 中 规定 的 数据 传输 使 用 格式 ， 与 之 相对 的 字 节 顺序 是 
主机 字 节 顺序 。 网 络 字 节 顺序 表示 首先 将 数据 中 最 重要 的 字 节 进行 存储 。 例 如 ， 当 数据 
0x358457 使 用 网 络 字 节 顺序 进行 存储 时 , 该 值 在 内 存 中 的 存放 顺序 将 是 0x35、0x84、0x57。 
因为 通信 数据 可 能 会 在 不 同 的 机 器 之 间 进 行 传输 ， 所 以 通信 数据 必须 以 相同 的 格式 进行 整 
理 。 只 有 经 过 格式 处 理 的 通信 数据 ， 才 能 在 不 同 的 机 器 之 间 进 行 传输 。 

在 Winsock 中 ， 已 经 提供 了 相关 的 函数 处 理 网 络 字 节 顺 序 的 相关 问题 ， 这 些 知 识 将 在 
第 2 章 中 具体 讲解 。 


1.3 ”Windows Sockets 介绍 


在 MFC 类 库 中 ， 几 乎 封装 了 Windows Sockets 的 全 部 功能 。 在 本 节 中 ， 将 向 用 户 介绍 
两 个 主要 的 套 接 字 相关 类 ， 分 别 是 CAsyncSocket 类 和 CSocket 类 。 


1.3.1 CAsyncSocket 类 


在 微软 基础 类 库 中 ，CAsyncSocket 类 封装 了 异步 套 接 字 的 基本 功能 。 用 户 使 用 该 类 进 
行 网 络 数据 传输 的 步骤 如 下 : 

(1) 调用 构造 函数 创建 套 接 字 对 象 。 

(2) 如 果 创建 服务 器 端 套 接 字 ， 则 调用 函数 Bind0 绑 定 本 地 卫 和 端口 ， 然 后 调用 函数 
Listen0 监 听 客 户 端的 请 求 。 如 果 请 求 到 来 ， 则 调用 函数 AcceptO 响 应 该 请 求 。 如 果 创 建 客 
户 端 套 接 字 ， 则 直接 调用 函数 ConnectO 连 接 服务 器 即 可 。 

(3) 调用 SendO 等 功能 函数 进行 数据 传输 与 处 理 。 

(4) 关闭 或 销毁 套 接 字 对 象 。 


全 注意 : 在 MFC 中 ， 所 有 类 中 均 有 一 个 变量 m_hWnd 表示 该 类 的 实例 句柄 。 
1.3.2 CSocket 类 


CSocket 类 派生 于 CAsyncSocket 类 。 该 类 不 但 具有 CAsyncSocket 类 的 基本 功能 ， 还 
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具有 串 行 化 功能 。 用 户 在 实际 编程 中 ， 通 过 将 CSocket 类 与 CSocketFile 类 和 CArchive 类 
一 起 使 用 ， 能 够 很 好 地 管理 数据 以 及 发 送 数据 。 用 户 使 用 该 类 进行 网 络 编程 的 步骤 如 下 : 

(1) 创建 CSocket 类 对 象 。 

(2) 如 果 创建 服务 器 端 套 接 字 ， 则 调用 函数 Bind0 绑 定 本 地 卫 和 端口 ， 然 后 调用 函数 
Listen() 监 听 客 户 端的 请 求 。 如 果 请 求 到 来 ， 则 调用 函数 AcceptO 响 应 该 请 求 。 如 果 创 建 客 
户 端 套 接 字 ， 则 直接 调用 函数 Connect0 连 接 服务 器 即 可 。 

(3) 创建 与 CSocket 类 对 象 相关 联 的 CSocketFile 类 对 象 。 

(4) 创建 与 CSocketFile 类 相关 联 的 CArchive 对 象 。 

(5) 使 用 CArchive 类 对 象 在 客户 端 和 服务 器 之 间 进 行 数据 传输 。 

(6) 关闭 或 销毁 CSocket 类 、CSocketFile 类 和 CArchive 类 的 3 个 对 象 。 


1.4 小 结 


本 章 向 用 户 介绍 了 网 络 编程 有 关 的 网 络 模型 、 工 作 原 理 、 网 络 协议 以 及 在 MFC 中 使 
用 相关 的 类 进行 网 络 程序 编写 步 又。 用 户 通过 本 章 的 学 习 ， 将 对 网 络 编程 的 基础 知识 有 一 
个 大 致 的 了 解 ， 同 时 也 为 后 面 的 实际 编程 操作 打下 基础 。 如 果 用 户 在 后 面 的 编程 实例 中 ， 
遇 到 一 些 网 络 编程 的 基础 知识 疑问 ， 可 以 再 对 本 章 进 行 复 习 、 巩 固 ， 以 便 更 好 地 理解 网 络 
编程 知识 。 
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套 接 字 是 由 美国 伯克利 大 学 提出 并 设计 的 一 种 在 网 络 中 不 同 主机 之 间 进 行 数据 交换 
的 通信 桥梁 。 在 实际 生活 中 ， 人 们 所 使 用 的 网 络 通信 软件 功能 均 是 基于 Socket 套 接 字 作为 
通信 桥梁 实现 。 所 以 ， 套 接 字 在 网 络 编程 中 ， 有 着 非 常 重要 的 作用 。 本 章 将 向 用 户 介 绍 使 
用 Socket 套 接 字 编程 的 相关 概念 以 及 实现 方法 。 


2.1 寻 址 方式 和 字 节 顺序 


在 讲解 套 接 字 编 程 前 ， 用 户 需 要 首先 了 解 一 下 什么 是 寻 址 方式 和 字 节 顺序 。 在 Socket 
套 接 字 编程 中 ， 为 了 准确 定位 通信 双方 和 数据 传输 的 有 效 性 、 完 整 性 ， 编 程 时 必须 使 用 统 
一 的 寻 址 方式 和 字 节 排列 顺序 。 


2.1.1， 寻 址 方式 


因为 套 接 字 需 要 在 各 种 网 络 协议 中 使 用 ， 所 以 为 了 区 分 程序 所 使 用 的 网 络 协议 必须 使 
用 统一 的 寻 址 方式 。 例 如 ， 在 TCP/IP 协议 通信 中 ， 用 户 使 用 他 地 址 和 端口 号 进行 确定 通 
信 双 方 。 而 在 其 他 的 协议 中 不 一 定 也 使 用 该 方式 确定 通信 双方 。 

在 Winsock (Socket API) 中 ， 用 户 可 以 使 用 TCP/IP 地 址 家 族 中 统一 的 套 接 字 地 址 结 
构 解 决 TCP/IP 寻 址 中 可 能 出 现 的 问题 。 该 套 接 字 地 址 结构 定义 如 下 : 


Struct sockaddr in{ 


short sin family; // 指 定 地 址 家 族 即 地 址 格式 
unsigned short sin port; // 端 口号 码 

struct in addr sin addr; /VIP 地 址 

char sin_zero[8]; ”// 留 作 备用 ， 需 要 指定 为 0 


}; 
在 这 个 结构 中 ， 成 员 sin_family 指定 使 用 该 套 接 字 地 址 的 地 址 家 族 。 在 这 里 必须 设置 
为 AF_INET， 表 示 程 序 所 使 用 的 地 址 家 族 是 TCP/IP。 
外 注意 : 该 结构 的 最 后 一 个 成 员 并 未 实际 使 用 ， 主 要 是 为 了 与 第 一 个 版 本 的 套 接 字 地 址 结 
构 大 小 相同 而 设置 。 在 实际 使 用 时 ， 将 这 8 个 字 节 直 接 设 为 0 即 可 。 
该 结构 成 员 变量 sin_addr 表示 32 位 的 卫 地 址 结构 。 其 结构 定义 如 下 : 
struct in addr { 


union { 
struct{ 
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unsigned char s bl, s b2,s b3,s b47 


} S un b; // 用 4 个 u char 字符 描述 ITP 地 址 
struct { 
unsigned short s wl,s w2; 
} Ss un wz // 用 2 个 u_short 类 型 描述 IP 地 址 
unsigned long Ss addr; // 用 1 个 u_long 类 型 描述 IP 地 址 
FS un 


}; 
通常 ， 用 户 在 网 络 编程 中 使 用 1 个 u_long 类 型 的 字符 进行 描述 IP 地 址 即 可 。 例 如 ， 
使 用 下 地址 结构 in_addr 进行 描述 IP 地址 “218.6.132.5”。 代 码 如 下 : 


sockaddr in addr7 
addr.sin addr.s un.s addr=inet addr("218.6.132.5"); 


在 程序 中 , 首先 定义 sockaddr in 结构 对 象 addr, 然后 为 IP 地 址 结构 in_addr 中 的 成 员 
S_addr 赋值 。 因 为 结构 成 员 S_addr 所 描述 的 P 地 址 均 为 网 络 字 节 顺 序 ， 所 以 程序 调用 
inet_addr0) 函 数 将 字符 串 耳 转换 为 以 网 络 字 节 顺 序 排列 的 他 地 址 。 


2.1.2 ” 字 节 顺序 


在 Socket 套 接 字 编程 中 ， 传 输 数 据 的 排列 顺序 以 网 络 字 节 顺序 和 主机 字 节 顺序 为 主 。 
通常 情况 下 ， 如 果 用 户 将 数据 通过 网 络 发 送 时 ， 需 要 将 数据 转换 成 以 网 络 字 节 顺序 排列 
否则 可 能 造成 数据 损坏 。 如 果 用 户 是 将 网 络 中 接收 到 的 数据 存储 在 本 地 计算 机 上 ， 那 么 需 
要 将 数据 转换 成 以 主机 字 节 顺序 排列 。 从 数据 存储 的 角度 来 讲 ， 网 络 字 节 顺序 即将 数据 中 
最 重要 的 字 节 首先 进行 存储 ， 而 主机 字 节 顺序 则 将 不 重要 的 字 节 首先 存储 。 


全 注意 : 卫 地 址 结构 in_addr 中 的 成 员 S_addr 的 值 均 是 以 网 络 字 节 顺序 排列 。 


1. 字 节 顺序 转换 函数 


在 Winsock 中 提供 了 几 个 关于 网 络 字 节 顺 序 与 主机 字 节 顺序 之 问 的 转换 函数 。 函 数 定 
义 如 下 : 


u short htons (u short hostshort ); 


// 将 一 个 u_short 类 型 的 IP 地 址 从 主机 字 节 顺序 转换 到 网 络 字 节 顺序 
u long htonl (u long hostlong ); 


// 将 一 个 u_long 类 型 的 IP 地 址 从 主机 字 节 顺序 转换 到 网 络 字 节 顺序 
u long ntohl (u long netlong ); 


// 将 一 个 u_long 类 型 的 IP 地 址 从 网 络 字 节 顺序 转换 到 主机 字 节 顺序 


u short ntohs (u_ short netshort ); 


// 将 一 个 u short 类 型 的 IP 地 址 从 网 络 字 节 顺序 转换 到 主机 字 节 顺序 
unsigned long inet addr (const char FAR * cp); 


// 将 一 个 字符 串 IP 转换 到 以 网 络 字 节 顺序 排列 的 IP 地 址 


char FAR * inet ntoa (struct in addr in); 
// 将 一 个 以 网 络 字 节 顺序 排列 的 IP 地 址 转换 为 一 个 字符 串 IP 
以 上 函数 的 使 用 均 与 操作 系统 平台 无 关 。 因 此 ， 用 户 使 用 这 些 函数 编写 的 程序 能 在 所 
有 操作 系统 平台 中 运行 。 
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2. 实例 程序 

在 本 节 中 ， 将 编写 实例 程序 向 用 户 讲解 字 节 顺序 转换 函数 的 用 法 。 代 码 如 下 : 
村 // 省 略 部 分 代码 

sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 

in addr in add; // 定 义 IP 地 址 结构 变量 

addr.sin family=AF INET; // 指 定 地 址 家 族 为 TCP/IP 

addqr.sin port=htons (80); // 指 定 端口 号 


addr.sin addr.s un.S addr=inet addr("127.0.0.1" 
// 将 字符 串 IP 转换 为 网 络 字 节 顺序 大 列 的 IP 
char addres[]=inet ntoa (addr.sin addr.s un.S addr); 
// 将 网 络 字 节 顺序 排列 的 IP 转换 为 字符 串 IP 
在 程序 中 ， 用 户 首先 使 用 函数 inet_addr0 将 字符 串 卫 “127.0.0.1” 转 换 为 以 网 络 字 节 
顺序 排列 的 人 P 并 保存 在 了 P 地 址 结构 成 员 S_addr 中 。 人 然后， 再 使 用 函数 inet_ntoa0 则 将 该 
成 员 所 表示 的 人 P 值 转换 成 字符 串 人 P。 


2.1.3 ”Socket 相关 函数 
由 于 Windows 网 络 程序 开发 均 是 基于 Windows 套 接 字 实 现 ,所 以 本 节 将 重点 介绍 MFC 
中 的 CSocket 类 以 及 使 用 CSocket 类 编程 的 基本 流程 。 
1. 创建 套 接 字 
使 用 CSocket 类 创建 套 接 字 对 象 是 通过 该 类 的 构造 函数 创建 的 。 其 原型 如 下 : 
CSocket::CSocket( ); 


例如 ， 用 户 创建 CSocket 类 对 象 ， 代 码 如 下 : 


CSocket sock; 


如 果 用 户 需 要 创建 套 接 字 对 象 指针 ， 则 应 该 使 用 关键 字 new 进行 创建 。 代 码 如 下 : 


CSocket *sock; // 定 义 套 接 字 指针 对 象 
sock=new CSocket; // 使 用 new 关键 字 创 建 套 接 字 
2. 绑 定 地 址 信息 


如 果 用 户 创 建 服务 器 套 接 字 ， 那 么 用 户 应 该 调用 该 类 的 函数 Bind0 将 套 接 字 对 象 与 服 
务 器 地 址 信息 绑 定 在 一 起 。 其 原型 如 下 : 

BOOL Bind ( const SOCKADDR* lpSockAddr, int nsockAddrLen ); 

该 函数 的 作用 是 将 套 接 字 对 象 与 服务 器 地 址 结构 绑 定 在 一 起 。 如 果 函 数 调用 成 功 ， 则 
返回 tmue。 和 否则 ， 返 回 false。 参 数 lpSockAddr 指定 将 要 绑 定 的 服务 器 地 址 结构 ， 参 数 
nSockAddrLen 表示 地 址 结构 的 长 度 。 例 如 ,用 户 将 上 面 创建 的 套 接 字 对 象 与 地 质 结构 绑 定 。 
代码 如 下 : 

Csocket sock; // 创 建 套 接 字 对 象 
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sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 
in addr in add; // 定 义 IP 地 址 结构 变量 
addr .sin family=AF INET; // 指 定 地 址 家 族 为 TCP/IP 
addr.sin port=htons (80); // 指 定 端口 号 
addr.sin addr.s un.s addr=inet addr("127.0.0.1"); 4 
/将 字符 串 IP 转换 为 网 络 字 节 顺序 排列 的 IP 
sock.Bind ( (SOCKADDR*) addr, sizeof (addr) ); // 绑 定 套 接 字 与 地 址 结构 
区 // 省 略 部 分 代码 


在 服务 器 端 ， 当 地 址 信息 绑 定 套 接 字 成 功 后 , 还 需要 调用 函数 Listen0 在 指定 端口 监听 


客户 端的 连接 请 求 。 函 数 Listen0 的 原型 如 下 : 


是 1 


BOOL Listen( int nConnectionBacklog = 5 ); 


参数 nConnectionBacklog 表示 套 接 字 监听 客户 端 请 求 的 最 大 数目 。 该 参数 的 有 效 范围 
一 5。 默 认为 5， 表 示 该 套 接 字 只 能 监听 5 个 客户 端 所 发 送 的 连接 请 求 。 例 如 ， 套 接 字 


监听 5 个 客户 端的 连接 请 求 ， 代 码 如 下 : 


CSocket sock; // 创 建 套 接 字 对 象 
sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 
in addr in add; // 定 义 IP 地 址 结构 变量 
addr.sin family=AF INET; // 指 定 地 址 家 族 为 TCP/IP 
addr .sin port=htons (80); // 指 定 端口 号 


addr.sin addr.s un.s addr=inet addr("127.0.0.1"); 
// 将 字符 串 IP 转换 为 网 络 字 节 顺序 排列 的 IP 


sock.Bind( (SOCKADDR*)addr, sizeof (addr) ); // 绑 定 套 接 字 与 地 址 结构 
sock.Listen(5); // 监 听 端 口 
3. 连接 服务 器 


客户 端 创 建 套 接 字 成 功 以 后 ， 可 以 调用 函数 ConnectO 向 服务 器 发 送 连接 请 求 。 函 数 原 


型 如 下 : 


务 器 


BOOL Connect ( const SOCKADDR* lpSockAddr, int nsockAddrLen ); 


该 函数 调用 成 功 ， 则 返回 true。 否 则 ， 将 返回 false。 参 数 jpSockAddr 表示 将 连接 的 服 


地 址 结构 。 参 数 nSockAddrLen 表示 地 址 结构 的 长 度 大 小 。 例 如 ， 服 务 器 IP 地 址 为 
“127.0.0.1”， 端 口 为 80， 客 户 端 连接 服务 器 ， 代 码 如 下 : 

CSocket sock; // 创 建 套 接 字 对 象 

sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 

in addr in add; // 定 义 IP 地 址 结构 变量 

addr.sin family=AF INET; // 指 定 地 址 家 族 为 TCP/IP 

addr.sin port=htons (80); // 指 定 端口 号 


adqdr.sin addr.S un.S addr=inet addr("127.0.0.1"); 


// 将 字符 串 IP 转换 为 网 络 字 节 顺序 排列 的 IP 
sock.Connect ( (SOCKADDR*) addr, sizeof (addr) ); // 连 接 服务 器 


4. 数据 交换 
无 论 是 服务 器 ， 还 是 客户 端 都 是 通过 函数 SendO 和 ReceiveO 进 行 数据 交换 。 函 数 原型 


如 下 : 
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Virtual int Send( const void* lpBuf, int nBufLen, int nFlags = 0 ) 7 
Virtual int Receive( void+ lpBuf, int nBufLen, int nFlags = 0 ); 


其 中 ， 函 数 Send0 用 于 发 送 指定 缓冲 区 的 数据 ， 函 数 Receive0 用 于 接收 对 方 发 送 的 数 
据 ， 并 将 数据 存放 在 指定 缓冲 区 中 。 参 数 lpBuf 表示 数据 缓冲 区 地 址 。 参 数 nBufLen 表示 
数据 缓冲 区 的 大 小 。 参 数 nFlags 表示 数据 发 送 或 接收 的 标志 ， 一 般 情 况 下 ， 该 参数 均 设置 
为 0。 例 如， 使 用 这 两 个 函数 进行 数据 的 发 送 和 接收 。 代 码 如 下 : 


ee // 省 略 部 分 代码 
char buff[]="'a'; // 定 义 并 初始 化 数据 缓冲 区 
sock.Send (gbuff, sizeof (buff) ,0); // 发 送 数据 缓冲 区 中 的 数据 


sock.Receive (gbuff，sizeof (buff),0); ”// 接 收 数据 并 将 数据 存放 在 数据 缓冲 区 中 


5. 关闭 套 接 字 对 象 

当 服 务 器 和 客户 端的 通信 完成 以 后 ， 用 户 还 必须 调用 函数 Close0) 将 套 接 字 对 象 关闭 。 
否则 ， 程 序 可 能 在 退出 时 发 生 错 误 。 该 函数 原型 如 下 : 

Virtual void Close( ); 

例如 ， 客 户 端 关闭 套 接 字 对 象 ， 代 码 如 下 : 


ee // 省 略 部 分 代码 

sock.Close() 7 // 关 闭 套 接 字 对 象 

套 接 字 关闭 的 同时 ， 也 将 服务 器 与 客户 端 之 间 连 接 关 闭 了 。 

本 节 主 要 向 用 户 介绍 了 CSocket 类 的 常用 函数 以 及 用 法 。 当 用 户 创建 VC 应 用 程序 时 ， 
如 果 没 有 为 应 用 程序 指定 支持 Windows Socket， 那 么 用 户 必 须 手 动 添加 该 类 的 头 文件 
afxsockh。 和 否则 ， 程 序 将 不 能 使 用 CSocket 类 。 


2.2 Winsock 网 络 程序 开发 流程 


本 节 将 向 用 户 讲述 基于 Windows Socket 的 应 用 程序 开发 步骤 , 并 将 编写 实例 程序 向 用 
户 介绍 网 络 应 用 程序 的 开发 过 程 以 及 CSocket 类 的 具体 使 用 方法 。 本 节 中 的 实例 程序 均 在 
VC 中 进行 编号、 调试。 


2.2.1 VC 中 创建 工程 的 步骤 


用 户 在 VC 中 使 用 应 用 程序 向 导 创 建 基于 套 接 字 的 应 用 程序 工程 时 ， 必 须 为 该 应 用 程 
序 指定 支持 Windows Socket 功能 。 和 否则， 创建 的 应 用 程序 不 能 进行 网 络 通信 。 

如 果 用 户 创建 工程 项 目 成 功 ， 则 在 应 用 程序 向 导 设 置 的 第 二 步 ， 将 询问 用 户 是 否 需 要 
在 项 目 中 支持 Windows Socket 功能 ， 如 图 2.1 所 示 。 

如 果 用 户 在 应 用 程序 的 第 二 步 没有 选择 项 目 支持 Windows Socket 功能 , 则 在 程序 中 手 
动 添加 代码 也 可 以 达到 同样 的 目的 。 其 代码 如 下 : 


#include <afxsock.h> // 包 含 cSocket 类 的 头 文件 
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了 EC 应 用 程序 向 导 一 
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| F 30 让 观 
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对 话 框 的 标题 是 : 


| 212 


| | 珊 


图 2.1 支持 Windows Socket 功能 


各 注意 : 头 文件 afxsock.h 中 包含 了 CSocket 类 的 变量 以 及 函数 定义 。 


2.2.2 ”Winsock 编程 流程 


在 本 书 的 第 1 章 中 ， 已 经 向 用 户 介绍 了 Winsock 函数 是 用 于 网 络 编程 的 Windows API 
函数 。 本 章 在 前 一 节 中 ， 向 用 户 介绍 了 CSocket 类 的 基本 编程 流程 。 所 以 ， 在 本 节 中 将 向 
用 户 介绍 使 用 SOCKET API 函数 进行 网 络 程序 开发 的 基本 流程 与 方法 。 


1， 初 始 化 和 释放 套 接 字库 
由 于 所 有 的 Winsock 函数 均 是 从 动态 链接 库 WS2_32.DLL 中 导出 的 ， 但 是 ，VC 在 默 


认 情 况 下 


没有 与 该 库 进行 连接 。 所 以 ， 用 户 需要 在 VC 中 进行 相关 设置 ， 使 其 连接 动态 


库 WS2_32.DLL。 添 加 方法 是 选择 “工程 ”| 设置” 命令， 将 弹出 Project Settings 对 话 框 ， 
如 图 2.2 所 示 。 


| Genera! | bebm | cce [Usk | Recourees | M CD 


分类 [eenem 一 


Setings For [Win3? Dehug_ 


忆 绽 出 交 件 名: 

Debwg/ToP 客 户 注 程 序 exe 

上 对 旭 / 诈 异 起 ; 

[Ws2 32.0tL 

万 G 产 生 测 二 信息 三 昌 息 咯 全 部 默认 库 
1 增加 链接 厂 娄 产生 地 图 文件 
厂 E 刀 许配 置 文件 

Project Option: 

wsz 32 0UL nelege feubeystem windows 


lincrementalyes fpdb: Debu 产 斌 祷 序 edb” 三 
We 


Ea Es 
图 2.2 添加 动态 链接 库 
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用 户 在 工程 设置 对 话 中 ， 可 以 修改 或 添加 库 模 块 〈 如 图 2.2 所 示 ) 。 在 库 模块 中 添加 
动态 链接 库 WS2_32.DLL。 这 样 ， 程 序 就 可 以 调用 Winsock 函数 了 。 

用 户 必须 首先 从 动态 链接 库 中 调用 函数 WSAstartup0 对 该 库 进行 初始 化 ， 之 后 才能 
该 库 中 继续 正确 调用 其 他 Winsock 函数 。 否 则 ， 将 出 现 错误 。 函 数 WSAstartup0 的 原型 如 下 : 


int WSAStartup (WORD wVersionRequested,LPWSADATA lpWSAData); 


该 函数 调用 成 功 ， 将 返回 0。 否则 ， 调 用 函数 失败 。 参 数 wVersionRequested 表示 当前 
套 接 字库 的 版 本 号 。 例 如 ， 当 前 套 接 字 版 本 号 为 2.0， 则 将 该 参数 设置 为 2.0。 代 码 如 下 : 


WORD wVersionRequested=MRKEWORD (2,0) 7 


参数 pWSAData 指向 结构 体 WSADATA 的 指针 变量 ， 表 示 获 取 到 的 套 接 字库 详细 信 


证 


\。 该 结构 体 定义 如 下 : 


typedef struct WSAData { 


WORD wVersion; // 库 文件 建议 应 用 程序 使 用 的 版 本 号 


WORD wHighVersion; 
char szDescription[WSADESCRIPTION LEN+1]; 
char szSystemStatus [WSASYS STATUS LEN+1]; 
unsigned short iMaxSockets; 
unsigned short iMaxUdpDg; 
char FRR * lpVendorInfo; 

} WSADATA, FAR * LPWSADATA; 


用 户 初始 化 套 接 字库 ， 代 码 如 下 : 


WSRAData data; 
WORD wVersionRequested=MRAKEWORD (2,0) 7 
::WSAStartup (wVersionRequested, gdata); 


// 库 文件 支持 的 最 高 版 本 
// 描 述 库 文件 的 字符 串 

// 系 统 状态 字符 串 

// 同 时 支持 的 最 大 套 接 字数 
// 已 废弃 

// 已 废弃 


// 定 义 WsAData 变量 
// 定 义 套 接 字 库 版 本 号 
// 初 始 化 套 接 字库 


当 程 序 退 出 时 ， 用 户 还 应 该 调用 函数 WSACleanup0 释 放 该 套 接 字库 。 代 码 如 下 : 


::WSACleanup () 7 


2. 创建 套 接 字 句柄 


在 Socket API 中 ， 创 建 套 接 字 句柄 的 函数 是 socketO。 该 函数 原型 如 下 : 


SOCKET socket ( 


int af, // 指 定 套 接 字 所 使 用 的 地 址 格式 ， 在 本 章 中 只 能 设置 为 AF_INET 


int type, // 套 接 字 类 型 


int protocol // 如 果 参 数 type 已 经 指定 套 接 字 类 型 为 TCP 或 UDP, 则 该 参数 可 以 设置 为 0 


); 


该 函数 执行 成 功 ， 将 返回 新 创建 的 套 接 字句 柄 。 否 则 ， 将 返回 INVALID_SOCKET 表 


示 失 败 。 参 数 type 的 取 值 如 表 2.1 所 示 。 
表 2.1 套 接 字 类 型 取 值 


套 接 字 类 型 取 值 合 ” 变 
SOCK_STREAM 创建 流 式 套 接 字 (基于 TCP 协议 ) 
SOCK DGRAM 创建 数据 报 套 接 字 (基于 UDP 协议 ) 
SOCK RAW 创建 原始 套 接 字 〈 本 书 中 未 使 用 ) 
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例如 ， 创 建 流 式 套 接 字 的 句柄 。 代 码 如 下 : 


SOCKET s; // 定 义 套 接 字句 柄 
s=::socket (AF_INET, SOCK STREAM,0); // 创 建 并 返回 套 接 字 句柄 


3. 绑 定 地 址 信息 


对 于 服务 器 而 言 ， 套 接 字 创建 成 功 后 ， 还 应 该 将 套 接 字 与 地 址 结构 信息 相关 联 。 实 现 
这 一 功能 的 函数 是 bind0。 该 函数 原型 如 下 : 


int bind ( 
SOCKET s, // 套 接 字 句柄 
const struct sockaddr FRR+ name, / /地址 结构 信息 
int namelen // 地 址 结构 的 大 小 


); 


该 函数 调用 成 功 ， 则 返回 0。 否 则 ， 函 数 调用 失败 。 例 如 ， 将 套 接 字句 柄 绑 定 到 本 地 
地 址 ， 代 码 如 下 : 


ee // 省 略 部 分 代码 
sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 
in addr in add; // 定 义 IP 地 址 结构 变量 
addr.sin family=AF INET; // 指 定 地址 家 族 为 TCP/IP 
addr.sin port=htons (80); // 指 定 端口 号 


addr.sin addr.S un.S addr=INADDR ANY  ”// 表 示 服 务 器 能 够 接收 任何 计算 机 发 来 的 请 求 
::bind(s, (sockaddr) saddr, sizeof (addr) ) ;// 绑 定 套 接 字 到 指定 地 址 结构 
当 服务 器 程序 将 套 接 字句 柄 绑 定 套 接 字 地 址 成 功 时 ， 则 调用 函数 listen0 实 现 监听 端口 
的 功能 。 该 函数 原型 如 下 : 
int listen ( 
SOCKET s, // 实 现 监听 功能 的 套 接 字 句柄 
int backlog // 指 定 监听 的 最 大 连接 数量 
Ye 
该 函数 仅 被 用 于 流 式 套 接 字 上 。 如 果 多 个 客户 端 同时 向 服务 器 发 出 连接 请 求 ， 并 且 以 
及 超过 了 最 大 监听 数 ， 则 客户 端 将 返回 错误 代码 。 例 如 ， 程 序 在 已 创建 的 套 接 字 s 上 进行 
监听 ， 代 码 如 下 : 


区 本 // 省 略 部 分 代码 
::listen(s,5); // 在 套 接 字 上 进行 监听 ， 并 且 将 最 大 监听 数 指定 为 5 


4. 连接 
客户 端 程序 连接 服务 器 使 用 函数 connect0 实 现 。 函 数 原型 如 下 : 


int connect ( 


SOCKET s, // 套 接 字句 柄 
const struct sockaddr FAR* name, // 将 要 连接 的 服务 器 地 址 信息 结构 指针 
int namelen // 地 址 信息 结构 体 长 度 


) 
例如 ， 客 户 端 使 用 该 函数 连接 地 址 为 “127.0.0.1”， 端 口 为 80 的 服务 器 。 代 码 如 下 : 


»14* 
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sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 
in addr in add; // 定 义 IP 地 址 结构 变量 
addr .sin family=AF INET; // 指 定 地 址 家 族 为 TCP/IP 
addr.sin port=htons (80); // 指 定 端口 号 
addr.sin addr.s un.S addr=inet adqr("127.0.0.1"); // 指 定 服务 器 地 址 
SOCKET s; // 定 义 套 接 字句 柄 
s=: :socket (AF_INET, SOCK STREAM, 0) 7 // 创 建 并 返回 套 接 字句 柄 
: :connect(s, ( sockaddr) &addr, sizeof (addr)); // 连 接 服务 器 

: // 省 略 部 分 代码 


如 果 服 务 器 接收 到 客户 端的 连接 请 求 , 则 可 以 调用 函数 acceptO 接 受 该 请 求 。 函数 原型 
如 下 : 


SOCKET accept ( 


SOCKET s, // 套 接 字 句柄 
struct sockaddr FAR* addr, // 获 取 连 接 对 方 的 地 址 信息 
int FAR* addrlen // 地 址 长 度 


); 
该 函数 如 果 调用 成 功 ， 则 返回 一 个 新 的 套 接 字句 柄 ， 用 于 通信 双方 数据 的 传输 。 
5. 数据 收发 


当 用 户 使 用 Winsock 编程 时 ,都 是 调用 函数 snd0 和 recv0O 进 行 数据 的 发 送 和 接收 。 函 
数 原型 如 下 : 
int send (SOCKET s, const char FAR * buf, int len, int flags); 
// 发 送 数据 函数 
int recv (SOCKET s，char FRR+ buf，int len，int flags); // 接 收 数据 函数 
两 个 函数 的 各 个 参数 以 及 表示 的 意义 均 相 同 。 参数 buf 是 指向 数据 缓冲 区 的 指针 变量 ， 
参数 flags 通常 设置 为 0。 
外 注意 : 如 果 服 务 器 使 用 上 面 的 函数 进行 数据 收发 ， 则 参数 s 应 该 为 监听 函数 返回 的 新 套 
接 字 和 句柄。 如果 客户 端 使 用 以 上 函数 进行 数据 收发 ， 则 参数 s 应 该 为 客户 端 创建 
的 套 接 字句 柄 。 
6. 关闭 套 接 字 


当 套 接 字 使 用 完毕 或 程序 退出 时 ， 用 户 应 该 调用 函数 closesocket0 关 闭 套 接 字 句柄 。 
函数 原型 如 下 : 
int closesocket ( 
SOCKET s // 将 关闭 的 套 接 字 句柄 
); 
参数 s 表示 即将 关闭 的 套 接 字 句柄 。 例 如 ， 用 户 关闭 前 面 创建 的 套 接 字 句柄 s， 代 码 
如 下 : 


::closesocket (s); 


本 节 主 要 向 用 户 讲述 了 使 用 Winsock 函数 进行 程序 设计 的 基本 流程 ， 并 讲解 了 部 分 常 
用 函数 的 用 法 等 知识 。 和 希望 用 户 在 实际 编程 的 过 程 中 ， 能 不 断 地 对 本 节 知 识 进行 回顾 ， 加 


。15 。 


第 1 篇 “Visual C++ 网 络 编程 基础 
深 理解 。 


2.2.3 ”基于 TCP 的 Sockets 编程 


在 本 节 中 ， 将 编写 一 个 简单 的 TCP 服务 器 和 TCP 客户 端 程序 。 这 两 个 实例 程序 均 为 
控制 台 程序 窗口 。 


1. TCP 服 务 器 


首先 ， 在 VC 中 新 建 一 个 基于 控制 台 的 应 用 程序 工程 ， 并 将 该 工程 命名 为 “TCP 服务 
器 ”， 如 图 2.3 所 示 。 


文件 工程 | 工作 区 | 其 它 文档 | 
AT COM PP Wza 工程 和 称 N: 
Cluster Resouree Type Wizard TC 
国 Gutom AppWzad fTeriR 元 器 
Bevo asl weard 位 置 (Qj: 
Extended Stored Proc Wizard [GADOCUMENTS AND SETTINGS, .| 
和 基建 新 的 工作 空间 四 
r i 四 
可 思 
lication 
nk Library 
平 首 中 : 
winaz 
RY 


图 2.3 新 建 控 制 台 应 用 程序 


然后 ， 单 击 “ 确 定 ”按钮 进行 应 用 程序 类 型 的 设置 。 在 本 节 中 ， 将 新 建 的 控制 台 程序 
类 型 指定 为 一 个 空 工程 ， 如 图 2.4 所 示 。 


您 想 要 创建 什么 类 型 的 控制 台 程序 9 
| 

个 一 个 简单 的 程序 (8) 

一 个 "Hello, World"' 程 序 Y] 

个 一 个 支持 MFC 的 程序 M 


图 2.4 设置 空 的 控制 台 程 序 
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用 户 还 需要 在 VC 中 添加 一 个 空白 的 C++ 源 文件 ， 名 称 为 TCPSEVER.cpp， 如 图 2.5 
所 示 。 


新建 器 回 
文件 | 工程 | 工作 区 | 其 它 文档 | 
国生 Sever Page 玉 添加 到 工程 内; 
日 ccwieraor ile Tc 要 | 
[SEC: ource File| 
回 HTML Page 
EE Macre File 文件 名 多 : 
国 SoL 人 File FTCPSEVER 
位 置 (OQ): 


[CADOCUMENTS AND SETTINGS .| 


职 消 
图 2.5 新 建 C++ 资源 文件 
用 户 在 新 建 的 C++ 源 文件 中 进行 代码 编写 。 代 码 如 下 : 
#include<winsock2.h> // 包 含 头 文件 


#include<stdio.h> 
#include<windows.h> 


#pragma comment (lib, "WS2 32.1ib") // 显 式 连 接 套 接 字库 

int main() // 主 函数 开始 

| 

WSADATA datay // 定 义 WSADATA 结构 体 对 象 

WORD w=MAKEWORD (2, 0) 7 // 定 义 版 本 号 码 

char sztext[]=" 欢 迎 你 \r\n"; // 定 义 并 初始 化 发 送 到 客户 端的 字符 数组 
::WSAStartup (w, &data); / /初始化 套 接 字库 

SOCKET s,sl; // 定 义 连接 套 接 字 和 数据 收发 套 接 字句 柄 
s=::socket (AF_INET, SOCK STREAM, 0); // 创 建 TCP 套 接 字 

sockaddr in addr,addr2; // 定 义 套 接 字 地 址 结构 

int n=sizeof (addr2); // 获 取 套 接 字 地 址 结构 大 小 

addr.sin family=AF INET7 // 初 始 化 地 址 结构 


addr.sin port=htons (75) 7 
adqdr.sin addr.S un.S addr=INADDR ANY; 
::bind(s, (sockaddr*+) gaddr, sizeof (addr) ); // 绑 定 套 接 字 


::listen(s,5); // 监 听 套 接 字 
Printf ("服务 器 已 经 启动 \r\n"); // 输 出 提示 信息 
while (true) 
4 

sl=: :accept (s, (sockaddr*) &addr2, gn); // 接 受 连接 请 求 


if (sl1!=NULL) 
{ 
printf ("%s 已 经 连接 上 \r\n", inet_ntoa(addr2.sin addr)); 
::send (sl,sztext,sizeof (sztext),0); // 向 客户 端 发 送 字 符 数 组 
| 


。17 。 


第 1 篇 “Visual C++ 网 络 编程 基础 


: :closesocket(s) ; // 关 闭 套 接 字 句柄 
::Closesocket (s1); 
::WSACleanup (); // 释 放 套 接 字 库 
if(getchar()) // 如 果 有 输入 ， 则 关闭 程序 
{ 
return 0; // 正 常 结束 程序 
} 
else 
{ 
::Sleep (100); // 应 用 睡眠 0.1 秒 


站 
编译 并 运行 程序 ， 如 图 2.6 所 示 。 


服务 器 程序 启动 以 后 ， 如 果 没 有 客户 端 向 其 发 送 连接 请 求 ， 则 服务 器 将 一 直 等 待 直到 


有 客户 端 程序 连接 。 
2. TCP 客 户 端 


到 )\12\ 书 中 . .- 图 | 


在 VC 中 创建 基于 控制 台 的 应 用 程序 ， 命 名 为 “TCP 
客户 端 ”。 其 方法 与 TCP 服务 器 的 创建 过 程 相同 。 所 以 ， 
在 这 里 不 再 效 述 ， 请 用 户 复 习 前 面 的 相关 内 容 。 在 新 建 
的 C+t+ 源 文件 TCPClient.cpp 中 ， 用 户 可 以 编写 客户 端的 
功能 代码 。 代 码 如 下 : 图 2.6 服务 器 启动 界面 


#include<winsock2.h> // 包 含 头 文件 
#include<stdio.h> 
#include<windows.h> 


#pragma comment (lib, "WS2 32.1ib") // 显 式 连 接 套 接 字库 

int main() // 主 函数 开始 

WSADATA data; // 定 义 WSADATA 结构 体 对 象 

WORD w=MAKEWORD (2,0); // 定 义 版 本 号 码 

: :WSAStartup (w, &data); / /初始 化 套 接 字库 

SOCKET s; // 定 义 连接 套 接 字 和 数据 收发 套 接 字 句柄 
char sztext[10]={0}; 

s=: :socket (AF_INET, SOCK_STREAM, 0); // 创 建 TCP 套 接 字 

sockaddr_ in addr; // 定 义 套 接 字 地 址 结构 

addr.sin family=AF INET; // 初 始 化 地 址 结构 


addr.sin port=htons(75); 

addr.sin addr.s un.S addr=inet addr("127.0.0.1"); 
printf ("客户 端 已 经 启动 \r\n"); // 输 出 提示 信息 
::connect (s, (sockaddr*) gaddr, sizeof (addr) ); 
::recv(s,sztext,sizeof (sztext),0); 
printf("%s\r\n",sztext); 


::closesocket (s); // 关 闭 套 接 字句 柄 
::WSACleanup () 7 // 释 放 套 接 字 库 
if(getchar()) // 如 果 有 输入 ， 则 关闭 程序 
{ 
return 0; / /正常 结 束 程序 

} 
JS 
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{ 
::Sleep (100); / /程序 睡 眠 
}} 


编译 并 运行 程序 ， 如 图 2.7 所 示 。 如 果 用 户 首先 打开 服务 器 程序 ， 再 打开 客户 端 程序 ， 
则 服务 器 会 接受 客户 端的 连接 请 求 ， 而 客户 端 会 显示 服务 器 发 送 的 欢迎 信息 ， 如 图 2.8 
所 示 。 


-| 口 | 
rem | 


图 2.7 客户 端 启动 界面 图 2.8 ”打开 服务 器 与 客户 端 


“E:\ 防 伟 ( 勿 到 )... 固 回 四 


ES 


本 节 向 用 户 讲解 了 TCP 服务 器 与 客户 端的 通信 过 程 ， 并 编写 了 实例 代码 。 用 户 在 学 习 
的 过 程 中 ， 如 果 对 本 章 实 例 有 兴趣 ， 可 以 将 随 书 光盘 中 的 相应 的 实例 代码 进行 改写 ， 以 达 
到 自己 的 要 求 。 


2.2.4 基于 UDP 的 Sockets 编程 


基于 UDP 的 网 络 程序 是 面向 无 连接 , 不 可 靠 的 一 种 应 用 程序 。 所 以 ， 当 程序 创建 套 接 
字句 柄 成 功 以 后 ， 便 可 以 直接 调用 函数 进行 数据 收发 ， 最 后 ， 关 闭 套 接 字 对 象 。 在 整个 过 
程 中 ， 程 序 都 不 用 调用 任何 函数 连接 服务 器 或 者 接受 客户 端的 连接 等 操作 。 这 种 类 型 的 应 
用 程序 多 用 在 即时 通信 中 。 

在 UDP 中 进行 数据 收发 的 函数 是 sendto0 和 recvfrom0。 函 数 原 型 如 下 : 


int sendto ( // 发 送 函 数 
SOCKET s, // 套 接 字 句柄 
const char FAR * buf, // 数 据 缓冲 区 
int len, // 数 据 的 长 度 
int flags， // 一 般 设置 为 0 
const struct sockaddr FRR * to,， // 目 标 地 址 结构 信息 
int tolen // 目 标 地 址 结构 大 小 


了 

int recvfrom (SOCKET s, char FAR* buf, int len, int flags, struct sockaddr 

FAR* from, int FAR* fromlen); // 接 收 函 数 

函数 recvfrom0 的 各 个 参数 与 函数 sendto() 的 参数 基本 一 致 。 参 数 from 是 指向 地 址 
结构 sockaddr_in 的 指针 ， 表 示 数 据 发 送 方 的 地 址 信息 。 参 数 fromlen 表示 该 地 址 结构 的 
大 小 。 


1. UDP 服务 器 


首先 ， 在 VC 中 创建 基于 控制 台 程序 窗口 的 应 用 程序 ， 并 命名 为 “UDP 服务 器 ”， 如 
图 2.9 所 示 。 
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然后 ， 将 该 工程 类 型 同样 指定 为 空 工程 。 在 新 建 的 工程 中 新 建 一 个 C++ 源 文件 ， 名 称 
为 UDPSevercpp， 如 图 2.10 所 示 。 


文件 工程 | 工作 区 | 其 它 文 档 | 


[BATL COM AppWizard 工程 
团 cluster Resource Type Wizard upP 服 务 器  ，，，，，，， 
国 custom AppWizard 
Database Project 位置 ; 
区 DevStudio Add-in Wizard 
说 Extended Stored Proc Wizard 梁 伟 铅 副 2 书 中 实例 书 .| 


ISAPI Extension Wizard 
疗 Makefile 
种 MFC Activex ControlWizard 


国 MFC AppWizard [dll] “BRB 创建 新 工作 区 
MFC AppWizard [exe} c 有 工作 区 
New Database Wizard 厂 D 从 属性 的 


fT Utility Project 


[IWin32 Application -| 


mm Win32 Console Application 


中 Win32 DynamicLink Library 
到 Win32 Static Library 


2.9 新 建 UDP 服务 器 


文件 | 工程 | 工作 区 | 其 它 文档 | 
Active Server Page 尺 汪 加 到 工程 四: 
Binary File Juop 服 和 器 | 


四 Cr+ Source File 
加 We Po 
Fs Macro File : 
旺 Soe it File Ss 
a 人 
时 六 [CADOCUMENTS AND SETTINGS .| 
0 
轩 资 送 模 板 


取消 
图 2.10 新 建 C++ 源 文件 
现在 用 户 可 以 在 该 源 文件 中 编写 UDP 服务 器 的 代码 。 代 码 如 下 : 


#include<winsock2.h> // 包 含 头 文件 
#include<stdio.h> 

#include<windows.h> 

#pragma comment (lib, "WS2 32.1ib") // 连 接 套 接 字库 
int main() 

让 

WSADATA data; // 定 义 结构 体 变量 
WORD w=MAKEWORD (2,0) ; // 定 义 套 接 字 版 本 
char sztext[]=" 欢 迎 你 \r\n"; // 定 义 欢迎 信息 

: :WSAStartup (w, &data); // 初 始 化 套 接 字库 
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SOCKET s; // 定 义 套 接 字 句柄 

s=: :socket (AF_ INET, SOCK DGRAM,0); // 创 建 UDP 套 接 字 
sockaddr in addr,addr2; // 套 接 字 地 址 结构 变量 
int n=sizeof (addr2); // 地 址 结构 变量 大 小 
char buff[10]={0}; // 接 收 数据 缓冲 区 


addqdr .sin family=AF INET7 
addr .sin port=htons(75); 
adqr.sin addr.s un.s addr=INADDR ANY; 
::bind(s, (sockaddr*) gaddr, sizeof (addr) ); // 绑 定 套 接 字 
printf ("UDP 服务 器 已 经 启动 \r\n") 7 // 显 示 提 示 信 息 
if(::recvfrom(s,buff, 10,0, (sockaddr*) gaddr2, gn) !=-1) // 接 收 客户 端 信息 
{ 
printf("%s 已 经 连接 上 \r\n",inet ntoa(addr2.sin addr)); 
::sendto(s, sztext, sizeof (sztext),0, (sockaddr*) gaddr2,n) ;// 发 送 数据 到 客户 端 


: :closesocket (s); // 关 闭 套 接 字 对 象 
: :WSACleanup (); // 释 放 套 接 字库 
人 ) // 如 果 有 输入 ， 则 关闭 程序 
et 0; // 正 常 结束 程序 
cae 
ee // 应 用 程序 睡眠 


} 
} 


编译 并 运行 程序 ， 如 图 2.11 所 示 。 
2. UDP 客户 端 


在 VC 中 创建 UDP 客户 端 程序 时 , 与 UDP 服务 器 相 
同 ， 工 程 类 型 均 为 空 工 程 。 所 以 ， 用 户 只 需 在 C++ 源 文 


件 中 编写 代码 实现 UDP 客户 端 。 代 码 如 下 : 2.11 UDP 服务 器 启动 界面 
#include<winsock2.h> // 包 含 头 文件 
#include<stdio.h> 
#include<windows.h> 
#pragma comment (lib, "WS2 32.1ib") // 连 接 套 接 字库 
int main() 

WSADATA data; // 定 义 结构 体 变量 
WORD w=MAKEWORD (2, 0); // 初 始 化 套 接 字 版 本 号 
: :WSAStartup (w, &data); // 初 始 化 套 接 字库 
SOCKET s; // 定 义 套 接 字 

s=: :socket (AF INET,SOCK DGRAM,0); / /创建 UDP 套 接 字 
sockaddr in addr,addr27 // 定 义 套 接 字 地 址 


int n=sizeof (addr2); 

char buff[10]={0}7 

addr .sin family=AF INET; 

addr.sin port=htons (75); 

addr.sin addr.s un.S addr=inet addr ("127.0.0.1"); 

printf ("UDP 客户 端 已 经 启动 \r\n"); 

if(::sendto(s, sztext, sizeof (sztext),0, (sockaddr*) gaddr, n) !=0) // 发 送信 息 
{ 
::recvfrom(s,buff,10,0, (sockaddr*) &addr2, gn); // 接 收 信息 


printf ("服务 器 说 : $s\r\n",buff); 


第 1 篇 “Visual C++ 网 络 编程 基础 


: :closesocket (s) 7 // 关 闭 套 接 字 
::WSACleanup (); / /释放 套 接 字库 
} 
if (getchar()) // 如 果 有 输入 ， 则 关闭 程序 

{ 

return 0; // 正 常 结束 程序 
} 

else 

{ 

::Sleep (100) 7 // 应 用 程序 睡眠 
} 


| 

编译 并 运行 程序 ， 如 图 2.12 所 示 。 

如 果 用 户 先 启动 UDP 服务 器 ， 再 启动 UDP 客户 端 ， 则 会 在 服务 器 界面 中 显示 客户 端 
连接 信息 。 而 客户 端 界 面 中 显示 服务 器 发 送 的 信息 ， 如 图 2.13 所 示 。 


图 2.12 客户 端 启动 界面 图 2.13 UDP 客户 端 与 服务 器 进行 通信 
在 本 小 节 中 ,向 用 户 讲解 了 在 VC 中 使 用 Winsock 函数 进行 网 络 程序 开发 ,并 结合 TCP 
与 UDP 实例 程序 介绍 了 基于 以 上 两 种 协议 的 网 络 程序 编写 方法 。 


2.3 ”网络 程 序 实例 应 用 


用 户 通过 本 章 前 面 两 节 知识 的 学 习 ， 已 经 对 网 络 程序 的 基本 原理 和 程序 编写 方法 有 了 
进一步 了 解 。 在 本 节 中 ， 将 引导 用 户 在 VC 中 编写 基于 对 话 框 的 TCP 服务 器 和 TCP 客户 
端 程序 并 且 进 行 详细 讲解 。 


2.3.1 TCP 客户 端 程序 

在 本 小 节 中 , 将 向 用 户 介绍 在 VC 中 创建 基于 对 话 框 模式 的 TCP 客户 端 程序 界面 以 及 
各 个 功能 的 实现 等 。 

1. 创建 工程 


在 VC 中 创建 一 个 基于 MFC 的 应 用 程序 工程 ， 并 且 将 该 工程 名 修改 为 “TCP 客户 端 
程序 ”。 步 又 如 下 : 
(1) 选择 “文件 ”|“ 新 建 ” 命 令 ， 打 开 “ 新 建 ”对 话 框 ， 如 图 2.14 所 示 。 
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工程 名 称 : 
Fe 和 PEF 


位 置 中 : 
ADOCUMENTS AND SETTINGS | 


"创建 新 约 工作 空间 四 
太 洪 加 到 当前 工作 空间 罗 
T 从 时 于 


图 2.14 创建 TCP 客户 端 实例 工程 


(2) 单 击 “ 确 定 ” 按 钮 ， 进 入 应 用 程序 向 导 设 置 的 第 一 步 ， 修 改 应 用 程序 的 类 型 为 “ 基 
本 对 话 框 ”， 如 图 2.15 所 示 。 


JEFC 应 用 程序 向 导 - 步 弗 1 


您 的 资源 使 用 的 语言 是 : 
中 文 [中国] APPWZCHS.DLUD 到 


< 上 [FS>] 成 | mW | 
图 2.15 “修改 应 用 程序 类 型 为 基本 对 话 框 


(3) 单 击 “ 下 一 步 ”按钮 , 进入 应 用 程序 向 导 设 置 的 第 二 步 , 设置 应 用 程序 支持 Windows 
Socket 的 功能 ， 如 图 2.16 所 示 。 

(4) 单 击 “ 完 成 ”按钮 ， 完 成 工程 的 创建 以 及 相关 配置 。 

现在 , 用 户 通 过 应 用 程序 向 导 已 经 完成 了 TCP 客户 端 工程 的 创建 以 及 为 该 工程 添加 了 
支持 Windows 套 接 字 功能 等 相关 的 一 些 配 置 。 接 下 来 ,用户 需要 打开 该 工程 的 资源 管理 器 
进行 程序 界面 的 设计 。 


2. 界面 设计 


当 工 程 创建 以 后 , 用 户 可 以 打开 资源 管理 器 查看 该 工程 的 对 话 框 资源 , 如 图 2.17 所 示 。 
用 户 可 以 通过 向 该 对 话 框 面板 中 添加 相应 的 控件 ， 以 达到 TCP 客户 端 程序 的 基本 功 
能 ， 如 图 2.18 所 示 。 
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了 TC 应 用 程序 向 导 - 步 村 2 共 4 步 
您 是 否 希望 包含 : 
订 "类 于 "对 话 框 
厂 上 下 文 相关 帮助 
及 30 外 观 
您 希望 包含 什么 其 他 支持 ? 
厂 自动 操作 四 
F ActiveX 控件 四 
您 项 望 包含 WOSA 支持 吗 ? 


F Windows Sockets 


对 话 框 的 标题 是 ， 
TCP 客 户 瑞 程序 


ICP 客 户 苇 各 序 一 基 天 中 文 YC4+ - [TCP 各 户 尝 抒 ,xe -IDp_ICP_DLtLDc (Dalog)] 
| 国 训 # 所 司 去 坷 基 入 工程 纺 评 晨 斋 工具 留 中 要 对 
EN-2-T WE) 


[Gr HJ css merber | 9crcpog 


a 1CP 窜 广 沁 程 序 回 


| = 和 | ] 
| 


| 网 口 性 


天 一 
| 


2.17 VC 默认 情况 下 的 对 话 框 资源 2.18 ”完成 设计 后 的 界面 效果 


其 中 ， 用 户 添 加 了 多 个 控件 ， 新 添加 的 控件 ID、 类 型 以 及 作用 ， 如 表 2.2 所 示 。 
表 2.2 控件 ID、 类 型 以 及 作用 


控件 D 控件 在 实例 中 的 作用 
IDC_ ADDR 输入 服务 器 卫 地 址 
IDC_PORT 输入 服务 器 端口 
IDC TEXT 显示 相关 信息 
IDC_SENDTEXT 输入 发 送 消息 
IDC_SEND 发 送 消息 按钮 
IDC_CONNECT 连接 服务 器 
IDC_STATIC1 标识 服务 器 地 址 
IDC STATIC2 标识 服务 器 端口 
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3. 界面 初始 化 


TCP 客户 端 程序 启动 时 ， 应 该 首先 连接 服务 器 以 后 ， 用 户 才能 通过 程序 发 送 消息 。 所 
以 ， 该 程序 初始 化 时 的 界面 ， 如 图 2.19 所 示 。 


二- ICP 客 户 内 程 序 


图 2.19 程序 初始 化 界面 


在 界面 初始 化 时 ， 已 经 屏蔽 了 发 送 消 息 的 功能 。 所 以 对 于 应 用 程序 而 言 ， 避 免 了 错误 
的 发 生 。 初 始 化 代码 如 下 : 


BOOL CTCPD1g: :OnInitDialog () 


1 
CDialog: :OnInitDialog (); 


本 // 省 略 部 分 代码 
GetDlgItem(IDC TEXT) ->EnableWindow(false) // 禁 用 消息 显示 框 
GetDlgItem(IDC SENDTEXT)->EnableWindow (false); // 禁 用 发 送 消息 编辑 框 
GetDlgItem(IDC SEND) ->EnableWindow(false) // 禁 用 发 送 消息 按钮 


a TRUE; 
用 户 使 用 函数 GetDlgItem0 获 取 对 应 ID 控件 的 指针 ， 然 后 使 用 该 指针 调用 函数 
EnableWindow0 将 控件 禁用 。 函 数 EnableWindow0 的 参数 如 果 为 tue， 则 表示 该 控件 可 以 
被 使 用 。 如 果 该 参数 为 false， 则 表示 该 控件 被 禁用 。 

在 界面 初始 化 时 ， 除 了 初始 化 界面 中 的 各 按钮 之 外 ， 还 应 该 对 套 接 字 进行 初始 化 。 初 
始 化 套 接 字 功能 的 代码 应 该 在 函数 CTCPDlg::OnInitDialog0 中 实现 。 代 码 如 下 : 


class CTCPD1g : public CDialog // 类 声明 
是 
public: 
CTCPD1g (CWnd* pParent = NULL); 
ee // 省 略 部 分 代码 
SOCKET s; // 定 义 套 接 字 对 象 
sockaddr in addr; // 定 义 套 接 字 地 址 结构 变量 
E 
BOOL CTCPD1g: :OnInitDialog() 
抽 
CDialog: :OnInitDialog(); 
人 7/ 省略 部 分 代码 
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S=: :SOCket (AF_INET,SOCK STRERM,0) 7 
return TRUE; 


// 创 建 套 接 字 并 返回 其 句柄 


在 代码 中 ， 用 户 在 类 中 声明 了 套 接 字 对 象 和 套 接 字 地 址 结构 变量 。 然 后 ， 在 初始 化 函 


数 中 创建 了 TCP 套 接 字 s。 
4. 功能 实现 


在 这 一 节 中 ， 用 户 可 以 为 各 个 功能 控件 编写 
相应 的 代码 ， 以 实现 其 功能 。 首 先 ， 为 “连接 ” 
按钮 添加 消息 响应 函数 。 在 该 控件 上 双击 鼠标 ， 
将 弹出 Add Member Function( 添 加 成 员 函 数 ) 对 
话 框 ， 如 图 2.20 所 示 。 

在 该 对 话 框 中 ， 用 户 可 以 将 “连接 ”按钮 的 
消息 响应 函数 名 修改 为 OnConnectO 。 函 数 代码 
如 下 : 


void CTCPD1g: :OnConnect () 


Add eaber Function 


Member function name; 
[connccd] 


Message: BN_CLICKED 
Object ID: IDC_CONNECT 


图 2.20 添加 成 员 函 数 对 话 框 


CString str,strl; // 定 义 字符 串 
int port; // 定 义 端口 变量 
GetD1gItem (IDC_RDDR) ->GetWindowText (str) 7 // 获 取 服 务 器 地 址 
GetD1gItem (IDC_PORT) ->GetWindowText (str1); // 获 取 端 口号 
iiE(str==""| 1strl=="") // 判 断 用 户 输入 是 否 为 NULL 
{ 
MessageBox ("服务 器 地 址 或 端口 不 能 为 NOLL") ; // 显 示 提 示 信 息 
} 
else 
{ 
port=atoi (strl.GetBuffer (1)); // 将 端口 字符 串 转换 为 数字 


adqdr.sin family=AF INET; 


addr.sin addr.s un.s addr=inet addr(str.GetBuffer(1)); 


// 转 换 服务 器 IP 地 址 
adqdr.sin port=ntohs (port); 
GetDlgItem(IDC TEXT) ->SetWindowText ("正在 连接 服务 器 ...... NENan) 7 
// 提 示 用 户 正在 连接 服务 器 
if(::connect(s, (sockaddr*) gaddr, sizeof (addr)) !=SOCKET ERROR) 
// 连 接 服务 器 
i 
GetD1gItem(IDC TEXT) ->GetWindowText (str); // 显 示 提 示 信 息 


str+=" 连 接 服务 器 成 功 ! \r\n"; 


GetDlgItem(IDC TEXT) ->SetWindowText (str); 

GetDlgItem(IDC SENDTEXT) ->EnableWindow (true); ”// 设 置 控件 的 显示 状态 
GetD1gItem(IDC SEND)->EnableWindow (true); 

GetDlgItem(IDC ADDR)->EnableWindow (false); 

GetD1gItem (IDC PORT)->EnableWindow (false); 


} 


else 


{ 


// 连 接 失败 


GetD1gItem (IDC TEXT) ->GetWindowText (str); 


str+=" 连 接 服务 器 失败 ! 请 重 试 \r\n"; 


GetD1gItem(IDC TEXT) ->SetWindowText (str); 


} 
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} 

} 

将 上 面 的 代码 保存 以 后 ， 进 行 编译 并 运行 。 如 果 客 户 端 连接 服务 器 成 功 ， 则 程序 会 提 
示 用 户 连 接 成 功 ， 如 图 2.21 所 示 。 否 则 ， 程 序 提示 用 户 连接 服务 器 失败 ， 如 图 2.22 所 示 。 


站 ICP 客 户 端 程序 


wo 


信息 显示 
下 和 
务 右 成 功 ? 


图 2.21 客户 端 连接 服务 器 成 功 图 2.22 客户 端 连接 服务 器 失败 


当 客 户 端 与 服务 器 连接 成 功 之 后 ， 用 户 便 可 以 发 送 消息 到 服务 器 了 。 现 在 ， 用 户 需 要 
为 “发 送 ” 按 钮 添加 相应 的 消息 响应 函数 ， 并 指定 该 函数 名 为 OnSend0。 该 函数 相关 代码 
如 下 : 


void CTCPD1g: :OnSend() 
. 


Cstring str,strl; // 定 义 字符 串 变量 
GetD1gItem (IDC_SENDTEXT) ->GetWindowText (str); // 获 取 用 户 发 送 的 消息 字符 串 
if(str=="") // 不 允许 用 户 发 送 空 消息 


GetD1gItem (IDC_TEXT) ->GetWindowText (str1); // 获 取信 息 框 中 的 内 容 
strl+="\r\n"; // 添 加 回 车 换行 符 
strl+=" 消 息 不 能 为 空 \r\n"; 
GetD1gItem (IDC_TEXT) ->SetWindowText (strl1) ; // 设 置信 息 框 中 的 内 容 
+ 
clse 
{ 
::send(s,str.GetBuffer(1),sizeof (str),0); // 发 送信 息 到 指定 服务 器 
GetD1gItem (IDC_TEXT) ->GetWindowText (strl1) ; // 获 取信 息 框 中 的 内 容 
strl+="\r\n"; // 添 加 回 车 换行 符 
strl+=str; 
GetD1gItem (IDC_TEXT) ->SetWindowText (str1); // 设 置信 息 框 中 的 内 容 
} 
} 


在 代码 中 ， 用 户 通过 调用 函数 send0 将 消息 发 送 到 指定 的 服务 器 ， 并 将 该 消息 显示 在 
本 地 的 信息 显示 框 中 ， 如 图 2.23 所 示 。 

作为 客户 端 ， 还 应 该 具有 接收 并 显示 服务 器 所 发 送 的 消息 。 在 本 实例 中 ， 将 采用 异步 
套 接 字模 式 实现 该 功能 。 在 VC 中 ， 将 套 接 字 设 置 为 异步 模式 ， 可 以 调用 函数 
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WSAAsyncSelect0 实 现 。 该 函数 原型 如 下 : 


int WSAAsyncSelect ( 让 .ICP 容 户 菇 程序 
SOCKET 5s, 
HWND hwngd, 
unsigned int wMsg, 
long lEvent 

) 7 


函数 各 个 参数 如 下 : 
口 参数 s 表示 需要 设置 为 异步 模式 的 | ja， 
套 接 字句 柄 。 
口 参数 hWnd 表示 接收 消息 响应 的 窗 
口 句柄 。 a 
Fm” 3 


口 参数 wMsg 表示 响应 消息 标识 。 

口 参数 IEvent 表 示 发 生 在 该 套 接 字 上 
的 事件 ， 取 值 如 表 2.3 所 示 。 图 2.23 客户 端 发 送 消息 

表 2.3 ” 套 接 字 事件 部 分 标识 及 其 意义 

套 接 字 事件 取 什 

套 接 字 上 发 生 读 取 事件 

套 接 字 上 发 生 写 入 事件 

首先 ， 在 程序 初始 化 函数 OnInitDialog 中 ， 将 套 接 字 设 置 为 异步 模式 。 代 码 如 下 : 


BOOL CTCPD1g::OnInitDialog() 
{ 


套 接 字 事件 取 值 


套 接 字 上 发 生 连 接 事 件 
套 接 字 上 发 生 关闭 事件 


这 // 省 略 部 分 代码 
GetDlgItem(IDC TEXT)->EnableWindow (false); // 设 置 各 个 控件 的 显示 状态 
GetDlgItem(IDC SENDTEXT)->EnableWindow (false); 

GetD1gItem(IDC SEND)->EnableWindow (false); 
s=::socket (AF_INET, SOCK_STREAM, 0); / /创建 套 接 字 

:: WSAAsyncSelect (s,this->m hWnd,WM SOCKET, FD READ); 

// 将 套 接 字 设置 为 异步 模式 


return TRUE; 
} 


代码 中 ， 将 异步 套 接 字 处 理 的 时 间 指 定 为 读 取 事 件 FD READ， 并 且 将 该 事件 的 处 理 
消息 指定 为 WM_SOCKET。 该 消息 是 在 CTCPDlg 类 头 文件 中 定义 的 自 定义 消息 。 代 码 
如 下 : 

#define WM SOCKET WM USER+100 // 定 义 自 定义 消息 


class CTCPD1g : public CDialog 
1 


人 // 省 略 部 分 代码 

Protected: 

afx_msg void OnSocket (WPARAM wParam, LPARAM 1Param) ;// 自 定义 消息 响应 函数 
} 


用 户 自 定义 消息 以 及 该 消息 的 响应 函数 成 功 后 ， 还 需要 在 消息 映射 表 中 将 消息 与 响应 
函数 相关 联 。 代 码 如 下 : 
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BEGIN MESSAGE MRP (CTCPD1g，CDialog) 
//{{AFX MSG MAP (CTCPD1g) 
ON BN CLICKED(IDC CONNECT, OnConnect) 
ON_BN CLICKED(IDC SEND, Onsend) 
ON MESSAGE (WM SOCKET,OnSocket) // 自 定义 消息 映射 项 
//}}AFX MSG MRP 
END MESSAGE MRP () 


最 后 ， 在 自 定 义 消 息 响 应 函数 OnSocket0 中 ， 实 现 套 接 字 事 件 的 处 理 。 代 码 如 下 : 


void CTCPD1g: :OnSocket (WPARAM wParam,LPRRRAM lParam) 
{ 


char cs[100]={0}; // 定 义 数据 缓冲 区 
ifE(L1Param==ED READ) // 如 果 是 套 接 字 读 取 时 间 

{ 

CString num=""; // 定 义 字符 串 变 量 
recv(s,cs,100, NULL); // 接 收 数据 
GetDlgItem(IDC TEXT)->GetWindowText (num) 7 // 获 取消 息 框 中 的 内 容 
num+="\r\n 服务 器 说 : "; // 添 加 回 车 换行 符 

num+= (LPTSTR) cs; // 将 接收 到 的 数据 转换 为 字符 串 


GetD1gItem(IDC_TEXT) ->SetWindowText (num) ; ”// 设 置 消息 框 内 容 

由 于 在 本 实例 中 ， 仅 处 理 了 套 接 字 的 读 取 事 件 ， 所 以 使 用 了 代码 “if(lParam 一 
FD_READ)”。 如 果 用 户 需要 处 理 的 套 接 字 事件 比 
较 多 ， 那 么 应 该 在 代码 中 使 用 关键 字 switch 进行 
分 类 判断 。 程 序 运行 效果 如 图 2.24 所 示 。 

到 这 里 ， 用 户 基 本 上 完成 了 客户 端 应 有 的 功 人 
能 。 在 客户 端 程序 中 ， 需 要 用 户 注 意 连 接 服务 器 本 
之 前 ,必须 首先 知道 服务 器 的 下 地 址 等 相关 信息 。 
否则 ， 程 序 将 无 法 正确 连接 到 服务 器 。 


,se 


2.3.2 TCP 服务 器 程序 


在 2.3.1 节 中 ， 已 经 向 用 户 讲解 了 制作 TCP 2.24 ”程序 运行 效果 
客户 端 程序 的 相关 方法 。 所 以 ， 在 本 节 中 将 向 用 户 继续 讲解 在 VC 中 怎样 制作 TCP 服务 器 
程序 。 

1. 创建 工程 

在 VC 中 ,创建 TCP 服务 器 工程 的 步骤 与 创建 TCP 客户 端 工程 的 步骤 一 样 ， 只 是 在 
修改 工程 名 称 时 应 该 为 “TCP 服务 器 程序 ”， 如 图 2.25 所 示 。 

其 他 相关 设置 步骤 均 与 TCP 客户 端 工程 的 设置 步骤 一 样 。 所 以 , 在 本 章 中 不 再 对 此 内 
容 进行 讲述 ， 请 用 户 复习 上 一 节 中 的 内 容 。 
很 注 意 : 用 户 在 VC 中 创建 实例 工程 的 步骤 大 体 相同 。 
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2. 界面 设计 


服务 器 工程 创建 完成 之 后 ， 用 户 可 以 打开 资源 管理 器 中 的 对 话 框 资源 进行 界面 的 设 
计 。 本 实例 中 ， 为 了 完成 服务 器 的 基本 功能 ， 所 以 在 对 话 框 面板 上 添加 如 表 2.4 所 示 的 控 
件 ， 并 调整 其 位 置 以 及 大 小 。 


新 建 回国 

文件 工程 | 工作 区 | 其 它 文档 | 

大 ATLCOM AppWizard 工程 名 称 电 : 
Cluster Resource Type Wizard Fcp 服 务 器 程序 
Custom AppWizard 
Database Project 

区 DevStudio Add-in Wizard i 
Extended Stored Proc Wizard CADOCUMENTS AND SETTINGS 局 | 
ISAPI Extension Wizard 
Makefile 
MFC ActiveX ControlWizard 


国 MFC AppWizard [dll] F 创建 新 的 工作 空间 四 
ey 玉 添加 到 当前 工作 空间 
New Database Wizard F Di 


Ts Utility Project 


|Win32 Application TCP 窜 户 强 程 
Win32 Console Application 

可 Win32 DynamicLink Library 

.| 


Win32 Static Library 


图 2.25 创建 TCP 服务 器 程序 工程 


表 2.4 控件 ID、 属 性 以 及 作用 


控件 DD 控件 作用 描述 
IDC_TEXT 显示 发 送 与 接收 到 的 信息 
IDC_SENDTEXT 输入 发 送 的 字符 串 
IDC_SEND 发 送信 息 
IDC_ADDR. 显示 本 机 地 址 


用 户 将 表 2.4 中 所 示 控 件 添加 到 对 话 框 面板 中 后 , 应 该 调整 各 个 控件 的 位 置 以 及 大 小 ， 
达到 界面 的 美化 。 运 行 之 后 的 程序 界面 效果 ， 如 图 2.26 所 示 。 
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pl 


1 


图 2.26 程序 界面 效果 


3. 界面 初始 化 


与 TCP 客户 端 一 样 ， 服 务 器 程序 启动 时 也 需要 界面 初始 化 。 不 过 ， 服 务 器 界面 在 初始 
化 时 ， 还 应 该 同时 完成 套 接 字 的 创建 以 及 地 址 绑 定 等 处 理工 作 。 首 先 ， 定 义 套 接 字 相关 变 
量 。 代 码 如 下 : 


class CTCPD1g : public CDialog 
{ 


public: 
CTCPD1g (CWnd* pParent = NULL); 
SOCKET s,sl1; // 定 义 套 接 字句 柄 


sockaddr in addr,addl; // 定 义 套 接 字 地 址 结构 变量 
= // 省 略 部 分 代码 

: 
然后 ， 在 对 话 框 初始 化 函数 中 创建 套 接 字 并 且 将 套 接 字 绑 定 到 本 地 地 址 。 代 码 如 下 


BOOL CTCPD1g: :OnInitDialog() 


CDialog: :OnInitDialog (); 


addr.sin family=AF INET; // 初 始 化 套 接 字 地 址 结构 
addr.sin port=htons (80); // 指 定 端口 
addr.sin addr.s un.s addr=INADDR ANY; 

::bind(s, (sockaddr*) gaddr, sizeof (addr) ); // 绑 定 本 地 地 址 
::listen(s,2); // 监 听 端 口 
GetDlgItem(IDC TEXT)->EnableWindow (false); // 禁 用 消息 显示 框 


GetDlgItem(IDC_ADDR) ->SetWindowText (" 服 务 器 监听 已 经 启动 ! ") ; 
return TRUE; 
上 


将 以 上 代码 保存 并 编译 运行 以 后 ， 服 务 器 界面 初始 化 运行 后 的 效果 ， 如 图 2.27 所 示 。 
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二 ICP 服 务 器 程序 


图 2.27 服务 器 界面 初始 化 


4. 功能 实现 


TCP 服务 器 应 该 具有 监听 、 发 送 和 接收 数据 的 功能 。 首 先 ， 用 户 应 该 为 程序 添加 监听 
功能 。 因 为 ， 服 务 器 必须 等 待 客户 端的 连接 请 求 到 来 之 后 ， 才 能 实现 接收 和 发 送 数据 。 将 
服务 器 创建 的 套 接 字 设置 为 异步 模式 , 并 将 套 接 字 事件 设置 为 连接 和 读 取 事件 。 代码 如 下 : 


#define WM SOCKET WM USER+1000 // 自 定义 套 接 字 消息 
class CTCPD1g : public CDialog 
{ 

和 // 省 略 部 分 代码 
Protected: 
afx msg HCURSOR OnQueryDragIcon(); 
afx msg void OnSocket (WPARAM wParam,LPARAM lParam);  // 自 定义 消息 响应 函数 


} 
BOOL CTCPD1g: :OnInitDialog () // 对 话 框 初始 化 函数 
CDialog: :OnInitDialog(); 
addr.sin family=AF INET; // 填 充 套 接 字 地 址 结构 
addr.sin port=htons (80); 
addr.sin addr.s un.s addr=INADDR ANY; 


::bind(s, (sockaddr*) gaddr, sizeof (addr) ); // 绑 定 本 地 地 址 
::listen(s,2); // 监 听 端 口 
::WSRARsyncSelect (s,this->m hWnd,WM SOCKET,FD ACCEPT|FD RERAD) 
// 设 置 异 步 套 接 字 


return TRUE; 


当 服 务 器 监听 套 接 字 上 有 相关 的 事件 发 生 时 ， 程 序 便 会 调用 自 定义 的 消息 响应 函数 
OnSocket0 对 该 事件 进行 处 理 。 代 码 如 下 : 


void CTCPD1g: :OnSocket (WPARAM wParam, LPARAM lParam) 
证 


Cstring strl3; // 定 义 字 符 串 变量 
char cs[100]={0}; // 定 义 字符 数组 
switch (lParam) 


case FD ACCEPT: // 如 果 事件 为 连接 事件 
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| 
sl=: :accept (s, (SOCKADDR*) &addl1, (int*) sizeof (add1)); 


// 应 答 客 户 端 的 连接 请 求 
n=n+1; // 连 接 的 客户 端 数目 
str13.Format ("有 $d 客户 已 经 连接 上 了 ",n) ; // 格 式 化 字符 串 

GetDlgItem(IDC TEXT)->SetWindowText (str13); // 设 置 消息 框 内 容 
strl3+=: :inet ntoa(addl.sin addr); // 转 换 IP 地 址 
str13+=" 登 录 \r\n"; 

GetDlgItem (IDC_TEXT) ->SetWindowText (str13); // 设 置 显示 消息 
} 
break; // 跳 出 该 函数 
case FD READ: // 处 理 读 取 事件 
{ 
Cstring num=""; // 定 义 字符 串 
::recv(sl,cs,100,0); // 接 收 消息 


GetDlgItem(IDC TEXT) ->GetWindowText (num); 
numt+="\r\n™; 
num+=(LPTSTR) ::inet ntoa(addl.sin addr);  // 转 换 IP 地 址 
num+=" 对 您 说 : "7 
num+= (LPTSTR) cs; 
GetD1gItem(IDC TEXT) ->SetWindowText (num); 
} 
break; 
} 
' 


用 户 在 以 上 代码 中 ， 实 现 了 服务 器 的 应 答 客户 端的 连接 请 求 以 及 显示 信息 等 功能 。 当 
有 客户 端 向 服务 器 发 送 连接 请 求 时 ， 服 务 器 将 显示 相关 信息 ， 如 图 2.28 所 示 。 如 果 已 经 连 
接 的 客户 端 发 送 消息 到 服务 器 ， 则 服务 器 程序 调用 函数 recv0 接 收 该 信息 并 将 该 消息 显示 
在 信息 框 中 ， 如 图 2.29 所 示 。 


让 .TCP 服务 器 程序 


服务 器 鉴 听 已 经 启动 ? 


图 2.28 服务 器 应 答 客户 端的 连接 请 求 图 2.29 服务 器 显示 接收 到 的 信息 


现在 ， 服 务 器 端 已 经 实现 了 应 答 服务 器 连接 请 求 和 接收 客户 端 信息 的 功能 。 但 是 ， 作 
为 服务 器 还 需要 具有 发 送 消息 的 功能 。 首 先 ， 用 户 可 以 使 用 VC 应 用 程序 向 导 为 “发 送 ” 
按钮 添加 消息 响应 函数 ， 如 图 2.30 所 示 。 
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Message Maps | Member Yariables | Automation | activeX Events | Class Info | 


Broject: Class name: 


TcP 服 务 器 程序 -crerots 
E4.-ATCP 服 务 器 程序 Dig.h, EX-YTCP 服 务 器 程序 plgcpp 


‘Object IDs: 
Add eaber Function 


Member function name: 
on 


Message: BN_CLICKED 
Object ID: IDC_SEND 
Y DoDataExchange 
W OninitDialog 
W Onpaint 
W OnQueryDraglcon ON_WM_QUEFYDRAGICON 
W OnSocket ON_WM_SOCKET 


ON_WM_INITDIALOG 


Description 


Indicates the user clicked a butlon 


图 2.30 ” 为“ 发送” 按钮 添加 消息 响应 函数 


用 户 可 以 通过 Add Member Funtion 对 话 框 修改 消息 响应 函数 的 函数 名 。 在 该 实例 中 ， 


将 该 函数 名 修改 为 OnSend0。 然 后 ， 单 击 OK 按钮 。 


在 函数 OnSend0 〇 中， 服务 器 程序 应 该 将 发 送 到 客户 端的 消息 也 显示 在 服务 器 端 界面 
中 。 这 样 ， 用 户 在 使 用 该 功能 时 ， 对 于 信息 的 发 送 与 接收 功能 的 实现 的 理解 比较 直观 。 代 


码 如 下 : 


void CTCPD1g: :Onsend() 


CString str="" // 定 义 字符 串 
GetD1gItem(IDC_SENDTEXT) ->GetWindowText (str); // 获 取 发 送 消息 
if(str==" ") // 消 息 不 能 为 空 
{ 
MessageBox (" 消 息 不 能 为 空 ! ") 7 // 显 示 提 示 信 息 
二 
ese 
{ 
if(::send(sl,str.GetBuffer(1), sizeof (str),0) !=SOCKET_ ERROR) 
// 发 送 消息 
{ 
GetD1gItem (IDC_TEXT) ->SetWindowText ("消息 已 经 发 送 到 客户 端 ! \r\n"); 
// 在 消息 框 中 显示 提示 信息 
GetD1gItem (IDC_TEXT) ->GetWindowText (str); // 获 取消 息 框 中 的 内 容 
str+="\r\n"; // 添 加 回 车 换行 符 
GetD1gItem(IDC_TEXT) ->SetWindowText (str); // 设 置 消息 框 中 的 内 容 
> 
else // 如 果 发 送 消息 不 成 功 
{ 
GetDlgItem(IDC_TEXT) ->SetWindowText ("消息 发 送 失败 ! \r\n"); 
// 提 示 用 户 发 送 消息 失败 
上 
| 
} 


在 程序 中 ， 用 户 首先 调用 函数 获取 发 送 消息 框 中 的 内 容 并 将 其 存放 在 字符 串 变 量 str 
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中 。 如 果 发 送 的 消息 是 空 字符 串 ， 则 提示 用 户 不 能 发 送 空 消息 。 接着， 程序 调用 函数 sendO 
将 消息 发 送 到 客户 端 ， 并 将 该 消息 显示 在 服务 器 界面 中 ， 如 图 2.31 所 示 。 


过 ICP 服 务 器 程 订 


骤 务 器 此 听 已 经 启动 b 


和 有 1 个 寺 户 训 守 扩 上 陪 和 轩 了 专 户 家 1 襄 ， 访 池 ? 


图 2.31 服务 器 发 送 并 显示 信息 


在 本 节 中 ， 向 用 户 讲解 了 在 VC 中 开发 TCP 服务 器 程序 的 步骤 和 方法 。 通 过 编写 实例 
程序 向 用 户 分 别 讲解 了 服务 器 工程 的 创建 ,构建 服务 器 界面 以 及 服务 器 各 个 功能 的 实现 等 。 
如 果 用 户 希 望 进一步 学 习 TCP 服务 器 编程 , 用户 就 可 以 在 实例 程序 的 基础 上 进行 修改 ， 以 
便 达 到 更 好 的 学 习 效 果 。 


2.4 小 结 


在 本 章 中 ,主要 向 用 户 介 绍 了 Socket 套 接 字 编 程 中 需要 使 用 的 基础 知识 以 及 相关 函数 。 
在 介绍 套 接 字 相 关 函 数 时 ， 主 要 讲解 了 函数 的 原型 以 及 使 用 等 。 在 2.2 节 和 2.3 节 中 ， 通 
过 在 VC 中 创建 实例 工程 向 用 户 分 别 介绍 了 创建 工程 ， 设 置 工程 和 实例 程序 编写 的 方法 。 
用 户 通过 本 章 的 学 习 ， 应 该 掌握 基本 的 套 接 字 编程 方法 以 及 使 用 VC 编译 器 创建 工程 等 
操作 。 

在 本 章 实 例 中 ， 所 有 代码 均 在 随 书 光盘 的 对 应 章节 中 ， 用 户 可 以 通过 本 书 中 所 讲述 的 
理论 知识 结合 光盘 中 的 实例 代码 进行 学 习 。 这 样 ， 可 提高 用 户 的 学 习 效率 。 
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在 Windows 操作 系统 中 , 线程 是 指 系 统 中 最 小 的 功能 执行 单元 , 其 可 以 独立 地 完成 某 
一 项 功能 。 所 以 在 进行 Windows 编程 中 ， 如 果 用 户 使 用 多 线程 处 理 某 个 功能 ， 那 么 该 功能 
被 处 理 的 效率 远 比 单个 线程 处 理 的 效率 高 。 在 本 章 中 ， 将 向 用 户 介绍 使 用 多 线程 处 理 异步 
套 接 字 编 程 的 相关 方法 。 


3.1 多 线程 技术 


在 Windows 操作 系统 中 , 所 有 程序 的 功能 都 是 由 每 个 程序 中 的 多 个 线程 共同 完成 。 从 
某 种 特定 的 意义 上 而 言 ， 线 程 才 是 计算 机 真正 意义 上 的 功能 执行 者 。 而 从 线程 执行 的 数目 
而 言 ， 线 程 可 以 分 为 单线 程 和 多 线程 。 其中， 多 线程 是 由 多 个 单线 程 组 成 。 如 果 从 线程 的 
执行 效率 而 言 ， 多 线程 比 单线 程 的 执行 效率 高 很 多 。 那 么 ， 当 用 户 在 编程 时 ， 使 用 多 线程 
技术 可 以 提高 程序 的 执行 效率 。 


3.1.1 基本 概念 


在 本 节 中 ， 将 介绍 一 些 关 于 计算 机 进程 和 线程 方面 的 基本 概念 。 用 户 通过 这 些 基 本 概 
念 的 学 习 ， 将 学 习 到 计算 机 程序 的 工作 原理 以 及 多 线程 处 理 方面 的 基础 知识 。 


1. 计算 机 进程 


文件 FF) 选项 ) 查看 QD 关机 WW) 帮助 Q0) 
在 计算 机 操作 系统 中 , 进程 是 指 当 可 执行 文 | [ET I [a [RP | 
件 运 行 时 ， 系 统 所 创建 的 内 核对 象 。 例如, 在 计 | | ER 
算 机 中 , 用 户 可 以 通过 任务 管理 器 查看 当前 系统 四 
中 所 有 的 进程 ， 如 图 3.1 所 示 。 a 
在 一 个 以 “.EXE” 为 后 缀 名 的 可 执行 程序 8 
中 ,可 以 包括 一 个 或 多 个 进程 ， 并 且 每 个 进程 都 遇 
有 自己 的 执行 地 址 空间 。 这 些 地 址 空间 在 逻辑 层 员 “全 
面 上 可 以 被 不 同 的 进程 重复 使 用 。 例如 , 计算 机 3 六 和 
系统 中 有 两 个 进程 , 分 别 为 进程 A 和 进程 B。 如 | 
果 进 程 A 在 某 一 地 址 空间 中 存放 了 一 个 数据 ， 


而 进程 B 可 以 在 同一 地 址 空间 中 存放 另 一 个 数 
据 。 当 两 个 进程 同时 在 该 地 址 空间 中 取出 各 自 对 图 3.1 显示 系统 中 所 有 的 进程 
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应 的 数据 时 ， 程 序 不 会 出 现 非 法 访问 内 存 等 错误 信息 。 这 是 因为 在 进程 中 真正 执行 某 个 功 
能 的 应 该 是 该 进程 中 的 线程 ， 这 些 线程 只 是 共享 同一 个 进程 的 地 址 空间 。 


2. 计算 机 线程 


线程 是 计算 机 中 最 小 的 执行 单元 。 通 常 ， 当 Windows 应 用 程序 运行 时 ， 操 作 系 统 都 会 
为 其 自动 创建 一 个 线程 ， 即 主线 程 。 通 过 主线 程 ， 用 户 可 以 创建 多 个 线程 或 进程 。 由 于 一 
个 进程 中 的 所 有 线程 共享 该 进程 地 址 空间 ， 所 以 ， 在 同一 个 进程 中 可 以 实现 多 个 线程 间 的 
相互 通信 。 

当 用 户 编程 时 ， 为 了 完成 某 一 项 功能 可 以 使 用 多 线程 技术 创建 多 个 线程 共同 完成 这 个 
功能 。 这 种 方法 比 单线 程 技术 实现 同一 功能 的 效率 快 。 实 际 上 , 现在 很 多 的 CPU 处 理 器 都 
只 支持 单线 程 技术 ， 但 是 一 个 多 线程 程序 为 什么 仍 能 运行 ， 这 是 因为 系统 程序 为 系统 中 的 
每 个 线程 都 分 配 了 执行 时 间 ， 而 且 这 个 执行 时 间 非 常 得， 以 至 于 用 户 感觉 几 个 线程 在 同时 
运行 。 

在 本 章 中 ， 主 要 是 让 用 户 学 习 多 线程 技术 的 编程 方法 以 及 它 在 网 络 编程 中 的 使 用 等 。 
所 以 ， 关 于 多 线程 技术 的 其 他 知识 ， 本 书 将 不 再 进行 深入 讲解 。 


3.1.2 ”创建 线程 


用 户 编程 时 ， 使 用 多 线程 技术 需要 首先 创建 线程 ， 然 后 再 使 用 这 些 线程 执行 相应 的 功 
能 。 如 果 用 户 是 在 VC 中 编写 多 线程 程序 ， 则 可 以 调用 API 函数 CreateThread0) 创 建 线程 。 
该 函数 原型 如 下 : 
HANDLE CreateThread ( 
LPSECURITY ATTRIBUTES lpThreadAttributes, 
DWORD dwSstackSize, 
LPTHREAD START ROUTINE lpStartAddress, 
LPVOID lpParameter, 
DWORD dwCreationFlags, 
LPDWORD lpThreadId 
); 
该 函数 的 作用 是 用 于 创建 一 个 线程 ， 并 将 返回 该 线程 的 句柄 。 其 中 ， 各 个 参数 含义 
如 下 : 
口 参数 lpThreadAttributes 是 一 个 指向 结构 体 SECURITY_ATTRIBUTES 的 指针 ， 表 
示 指 定 新 建 线程 的 安全 属性 。 该 参数 可 以 设置 为 NULL， 表 示 创 建 线程 时 使 用 默 
认 的 安全 属性 。 

口 参数 dwStackSize 指定 线程 初始 化 时 地 址 空间 的 大 小 。 如 果 这 个 参数 指定 为 0， 那 
么 新 创建 线程 的 地 址 空间 大 小 与 调用 该 函数 的 线程 地 址 空间 大 小 一 样 。 

口 参数 lpStartAddress 将 指定 该 线程 的 线程 函数 的 地 址 。 当 线程 创建 成 功 以 后 ， 新 建 

线程 将 调用 该 线程 函数 执行 某 个 功能 。 

口 参数 jpParameter 表示 将 要 传递 给 新 建 线程 的 命令 行 参数 。 新 建 线程 可 以 根据 该 命 

令 参 数 的 不 同 而 执行 不 同 的 功能 。 
口 参数 dwCreationFlags 用 于 指定 新 线程 创建 后 是 否 立即 运行 。 其 取 值 如 表 3.1 所 示 。 
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表 3.1 线程 创建 标记 


状 态 值 作 用 
CREATE SUSPENDED 线程 创建 成 功 后 暂停 运行 
0 线程 创建 成 功 后 立即 运行 


外 注意 : 当 用 户 创建 线程 时 ， 将 该 参数 值 指定 为 CREATE_SUSPENDED， 则 线程 将 处 于 
暂停 状态 ， 直 到 用 户 调用 相关 函数 将 线程 恢复 运行 为 止 。 


口 参数 lpThreadId 表示 新 建 线程 的 人 D 号 。 在 这 里 , 用 户 可 以 将 该 参数 设置 为 NULL。 

例如 ， 用 户 在 程序 中 ， 使 用 该 函数 分 别 创建 两 个 线程 ， 并 在 这 两 个 线程 中 分 别 打印 出 
各 自 的 函数 信息 。 首 先 ， 用 户 打开 VC， 并 创建 一 个 基于 控制 台 程序 窗口 的 工程 ， 并 将 工 
程 名 修改 为 “创建 线程 ”， 如 图 3.2 所 示 。 


文件 工程 | 工作 区 | 其 它 文档 | 


国 ATL COM AppWizard 工程 
ElCluster Resource Type Wizard 

Custom AppWizard 和 

Database Project 
过 DevStudio Addin Wizard 7 

Extended Stored Pre Wizard (CWOCUMENTS AND SETTINGS 

ISAPI Extension Wizard 

Makcfilc 

MFC ActiveX ControlWizard 

MFC AppWizard [dl “BB 创 建新 工作 区 

MFC ApPWizard [exe] 个 A 逢 加 至 轧 有 工作 E 

New Database Wizard 厂 DD 从 属性 六 
Yh Uiitity Project ;| 
下 Win32 Application = 
ma Win32 Console Application = 
下 win32 DynamicLink Library 
DWin32 Static Lbrary 

中 平台 
Win32 
商定 结 来 


3.2 ”创建 控制 台 工程 


然后 ， 单 击 “ 确 定 ” 按 钮 ， 转 到 工程 设置 中 将 该 工程 设置 为 一 个 空 的 控制 台 程 序 ， 如 
图 3.3 所 示 。 


ole Application 


水 村 1 闪 1 步 


您 起 要 创建 什么 类 型 的 控制 问 程 序 ? 


三 一 个 "Hello, Worldr* 程序 
人 一 个 支持 MFC 的 程序 IM) 


3.3 ”指定 该 工程 为 空 工程 
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最 后 ， 单 击 “ 完 成 ”按钮 ， 完 成 该 控制 台 工程 的 设置 ， 返 回 到 VC 主 界面 中 。 用 户 在 
该 工程 中 需要 添加 一 个 空白 的 C++ 源 文件 以 便 编写 代码 。 创 建 线程 实例 ， 代 码 如 下 : 


#include <windows .h> 
#include <stdio.h> 
DWORD WINAPI myfunl( 
LPVOID lpParameter 
) 7 
DWORD WINRPI myfun2( 

LPVOID lpParameter 
i 


int main() 


HANDLE hl,h27 


hl=: :CreateThread (NULL, 0, myfun]l, NULL, 0, NULL); 


printf ("线程 1 开始 运行 ! \r\n"); 


h2=: :CreateThread (NULL, 0, myfun2, NULL, 0, NULL); 


printf ("线程 2 开始 运行 ! \r\n"); 
::CloseHandle (h1); 
::CloseHandle (h2); 
if(getchar()=='q') 
{ 
return 0; 
} 
else 
{ 
::Sleep(100); 


} 
DWORD WINAPI myfunl (LPVOID lpParameter) 
{ 


printf ("线程 1 正在 运行 ! \r\n"); 
return 07 


} 
DWORD WINAPI myfun2 (LPVOID lpParameter) 


printf ("线程 2 正在 运行 ! \r\n"); 
return 07 


} 


在 程序 中 ， 用 户 首先 声明 了 两 个 线程 函数 ， 然 后 在 主 函数 
中 创建 两 个 线程 ， 分 别 为 hl 和 h2。 当 线程 创建 成 功 以 后 ， 系 
统 会 自动 调用 相应 的 线程 函数 并 执行 其 中 的 功能 。 将 上 面 的 程 


序 在 VC 中 进行 编译 、 运 行 ， 如 图 3.4 所 示 。 


用 户 可 以 从 该 实例 程序 中 ， 学 习 到 怎样 声明 和 定义 线程 函 


数 以 及 使 用 函数 CreateThreadO 进 行 线程 的 创建 。 


外 注意 : 用 户 从 程序 运行 的 结果 中 可 以 得 知 ， 线 程 | 和 线程 2 
并 没有 按照 代码 的 运行 顺序 而 执行 其 功能 。 
用 户 需 要 使 用 线程 的 同步 技术 避免 类 似 情 况 的 发 生 。 
在 3.2 节 中 , 将 为 用 户 讲解 实现 线程 同步 的 编程 方法 。 


// 包 含 相 应 头 文件 
// 声 明 线程 函数 


// 主 函数 

// 定 义 句柄 变量 

// 创 建 线程 1 

// 输 出 线程 1 运行 信息 
// 创 建 线程 2 

// 输 出 线程 2 运行 信息 

// 关 闭 线程 句柄 对 象 

// 如 果 用 户 输入 字符 q 

// 程 序 正常 退出 

// 如 果 用 户 输入 的 字符 不 是 q 


// 程 序 睡眠 


// 分 别 实现 线程 函数 


// 输 出 信息 
// 正 常 结束 线程 函数 


。 E:\ 梁 伟 ( 匆 到 )\12\.,。 回回 | 


图 3.4 创建 线程 实例 
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3.2 ”实现 线程 同步 


线程 同步 是 指 同一 进程 中 的 多 个 线程 互相 协调 工作 达到 一 致 性 。 当 用 户 编写 程序 时 ， 
有 时 会 使 多 个 代码 段 同 时 读 取 或 修改 相同 地 址 空间 中 的 共享 数据 。 此 时 ， 在 操作 系统 中 ， 
可 能 会 出 现 一 个 代码 段 在 读 取 数据 ， 而 另 一 个 代码 段 却 正在 修改 数据 。 这 样 的 情况 会 导致 
程序 发 生 读 写 错误 ， 造 成 程序 异常 退出 。 用 户 为 了 避免 出 现 类 似 情况 ， 需 要 使 用 线程 同步 
技术 。 即 当 一 个 线程 程序 对 资源 进行 读 写 时 ， 其 他 的 线程 程序 则 处 于 等 待 状态 。 


3.2.1 ”临界 区 对 象 


临界 区 对 象 是 指 当 用 户 使 用 某 个 线程 访问 共享 资源 时 ， 必 须 使 代码 段 独 享 该 资源 ， 不 
允许 其 他 线程 程序 访问 该 资源 。 待 该 代码 段 访 问 完 资源 后 , 其 他 程序 才能 对 资源 进行 访问 。 
这 样 的 模式 好 比 某 个 用 户 在 试 衣 间 里 试 衣服 ， 而 其 他 用 户 则 只 能 等 待 。 当 试 衣 间 里 的 用 户 
出 来 之 后 ， 其 他 用 户 才能 进入 试 衣 间 内 。 在 本 节 中 ， 将 向 用 户 分 别 介绍 如 何 使 用 API 函数 
和 MFC 类 对 临界 区 对 象 进行 编程 的 方法 。 


1. 使 用 API 函 数 操作 临界 区 


当 用 户 在 实际 编写 程序 时 ， 使 用 临界 区 对 象 前 必须 对 临界 区 进行 初始 化 。 在 VC 中 进 
行 编 程 , 用 户 可 以 调用 函数 InitializeCriticalSection0 对 临界 区 对 象 进行 初 始 化 。 该 函数 原型 
如 下 : 

Void InitializeCriticalSection( 

人 SECTION 1pCriticalSection 

该 函数 的 作用 是 为 应 用 程序 初始 化 临界 区 。 其 中 ,参数 lpCriticalSection 是 指向 结构 体 
CRITICAL SECTION 的 指针 变量 。 由 于 该 参数 所 标识 的 结构 体 对 象 是 由 操作 系统 自动 进 
行 维护 的 ， 所 以 用 户 在 编程 时 可 以 不 用 理会 该 结构 体 变量 的 具体 操作 。 例 如 ， 用 户 调用 该 
函数 对 临界 区 进行 初始 化 。 代 码 如 下 : 


CRITICAL SECTION m sec; // 定 义 结构 体 CRITICAL_SECTION 变量 
InitializeCriticalSection(&m sec); // 初 始 化 临界 区 
i // 省 略 部 分 代码 


在 程序 中 ， 用 户 首先 定义 了 结构 体 CRITICAL SECTION 的 变量 m_sec， 其 用 于 存放 
临界 区 的 相关 信息 。 然 后 ， 调 用 函数 InitializeCriticalSection0 对 临界 区 进行 初始 化 。 

当 用 户 对 临界 区 进行 初始 化 以 后 ， 程 序 便 可 以 进入 该 临界 区 并 拥有 该 临界 区 对 象 的 所 
有 权 。 而 其 他 程序 则 只 能 等 待 进入 临界 区 的 程序 释放 临界 区 的 所 有 权 后 ， 才 能 进入 临界 区 
进行 操作 。 用 户 实现 这 个 功能 可 以 调用 函数 EnterCriticalSection0 。 该 函数 原型 如 下 : 


Void EnterCriticalSection( 
LPCRITICAL SECTION lpCriticalSection 
); 
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该 函数 的 作用 是 使 调用 该 函数 的 线程 程序 进入 已 经 初始 化 的 临界 区 ， 并 拥有 该 临界 
的 所 有 权 。 如 果 线 程 程序 获得 临界 区 的 所 有 权 成 功 ， 则 该 函数 将 返回 ， 调 用 线程 继续 执行 。 
否则 ， 该 函数 将 一 直 等 待 ， 这 样 会 造成 该 函数 的 调用 线程 也 一 直 等 待 。 


各 注意 : 当 用 户 使 用 临界 区 对 象 实现 线程 同步 编程 时 ， 不 应 使 函数 EnterCiiticalSection0 
等 待 的 时 间 过 长 。 因 为 这 样 会 造成 调用 线程 的 等 待 ， 使 操作 系统 出 现 假死 现象 。 
例如 ， 用 户 调用 该 函数 进入 临界 区 操作 被 保护 的 共享 资源 ， 同 时 获取 该 共享 资源 的 所 

有 权 。 代 码 如 下 : 


区 


本 // 省 略 部 分 代码 

EnterCriticalSection(&m sec); // 进 入 已 经 被 初始 化 的 临界 区 

Se // 省 略 部 分 代码 

如 果 调 用 该 函数 的 线程 成 功 获得 临界 区 所 有 权 ， 那 么 该 线程 将 继续 执行 代码 。 否 则 ， 
该 线程 将 一 直 等 待 ， 直 到 获得 临界 区 的 所 有 权 。 

当 线 程 使 用 完 共享 资源 后 ， 则 必须 离开 临界 区 并 释放 对 该 临界 区 的 所 有 权 ， 以 便 让 其 
他 线程 也 获得 访问 该 共享 资源 的 机 会 。 函 数 LeaveCriticalSection0 的 作用 是 使 已 经 进入 临界 
区 的 线程 释放 对 该 临界 区 的 所 有 权 并 离开 临界 区 。 该 函数 原型 如 下 : 


void LeaveCriticalSection( 
LPCRITICAL SECTION lpCriticalSection 

); 

调用 该 函数 的 线程 将 离开 指定 的 临界 区 并 释放 该 临界 区 的 所 有 权 。 当 用 户 使 用 临界 区 
对 象 进行 编程 ， 一 定 要 在 程序 不 使 用 临界 区 时 ， 调 用 该 函数 释放 临界 区 所 有 权 。 否 则 ， 程 
序 将 一 直 等 待 ， 造 成 程序 假死 。 例 如 ， 当 用 户 使 用 完 被 临界 区 保护 的 共享 资源 后 ， 需 要 调 
用 函数 LeaveCriticalSection0 释 放 该 临界 区 的 所 有 权 。 代 码 如 下 : 

5 /7 省略 部 分 代码 

LeaveCriticalSection (gm sec); // 释 放 临 界 区 所 有 权 并 离开 该 临界 区 

ss // 省 略 部 分 代码 

如 果 调 用 线程 释放 临界 区 的 所 有 权 之 后 ， 用 户 应 该 在 程序 中 调用 函数 DeleteCritical 
Section0 将 该 临界 区 从 内 存 中 删除 。 该 函数 原型 如 下 : 


Void DeleteCriticalSection( 
LPCRITICAL SECTION lpCriticalSection 


); 


该 函数 的 作用 是 删除 程序 中 已 经 被 初始 化 的 临界 区 。 如 果 函 数 调用 成 功 ， 则 程序 会 将 
内 存 中 的 临界 区 删除 ， 防 止 出 现 内 存 错误 。 例 如 ， 用 户 使 用 临界 区 相关 的 API 函数 进行 编 
程 。 代 码 如 下 : 


#include <windows .h> // 包 含 头 文件 
#include <stdio.h> 
DWORD WINAPI myfunl ( // 声 明 线程 函数 


LPVOID lpParameter 
); 
DWORD WINAPI myfun2( 
LPVOID lpParameter 
); 
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static int al=07 
CRITICAL _ SECTION Section; 
int main() 

{ 

HANDLE hl,h27 


hl=::CreateThread (NULL, 0, myfun]l, NULL, 0, NULL); 


| 


printf ("线程 1 开始 运行 ! \r\n"); 


h2=: :CreateThread (NULL, 0,myfun2, NULL, 0, NULL); 


printf ("线程 2 开始 运行 ! \r\n"); 
::CloseHandle (h1); 
::CloseHandle (h2); 
InitializeCriticalSection(&Section); 
::Sleep(10000); 
printf ("正常 退出 程序 请 按 'q'\r\n"); 
if(getchar()=="'q') 


DeleteCriticalSection(&Section); 
} 
else 
{ 
return 0; 
} 
i 
DWORD WINAPI myfunl (LPVOID lpParameter) 
‘ 


while(1) 
{ 
EnterCriticalSection(&Section) 7 
日 1 十 十 7 
if(al<10000) 
{ 
::Sleep(1000); 
printf ("线程 1 正在 计数 %d\r\n",al); 
LeaveCriticalSection(&Section); 
} 
else 
\: 
LeaveCriticalSection (&Section); 
break; 
} 
} 
return 0; 
} 
DWORD WINRPI myfun2 (LPVOID lpParameter) 


while(1) 
{ 
EnterCriticalSection(&Section); 
alt+; 
if(al<10000) 
::Sleep(1000); 
printf ("线程 2 正在 计数 $d\r\n",al); 
LeaveCriticalSsection(&Section); 
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// 定 义 全 局 变量 并 初始 化 
// 定 义 临界 区 对 象 
// 主 函数 


// 定 义 线程 句柄 
// 创 建 线程 1 


// 创 建 线程 2 
// 关 闭 线程 句柄 对 象 


// 初 始 化 临界 区 对 象 
// 程 序 睡眠 10 秒 


// 如 果 用 户 输入 字符 a 
// 删 除 临界 区 对 象 

// 如 果 用 户 输入 的 不 是 q 
// 程 序 自动 退出 


// 线 程 函数 1 


// 进 入 临界 区 

// 变 量 自 加 

// 设 置 变量 al 小 于 10000 
// 程 序 睡眠 1 秒 
// 离 开 临 界 区 

// 如 果 变量 大 于 10000 


// 离 开 临 界 区 
// 跳 出 循环 


// 线 程 函数 2 


// 进 入 临界 区 


// 程 序 睡眠 1 秒 
// 离 开 临 界 区 
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} 


SLSe 


LeaveCriticalSsSection(&Section); 

break; 

return 0; // 线 程 函 数 返回 0 

} 

在 程序 中 , 用 户 首先 声明 临界 区 对 象 Section 和 两 个 线程 函数 (myfun10 和 myfun20)， 
然后 在 主 函 数 中 创建 两 个 线程 ， 即 hl 和 h2。 主 线程 调用 函数 nitializeCriticalSection0 初 始 
化 临界 区 对 象 并 通过 函数 Sleep0 暂停 10 秒 。 在 线程 函数 1 中 ， 程 序 调用 函数 
EnterCriticalSection0 进 入 临界 区 ,通过 循环 使 变量 al 自 加 ， 然后 输出 结果 并 离开 临界 区 将 
共享 变量 al 的 所 有 权 交 给 线程 函数 2。 在 线程 函数 2 中 实现 同样 的 功能 。 程 序 运行 结果 ， 
如 图 3.5 所 示 。 

用 户 从 程序 运行 的 结果 中 可 以 看 到 ， 线 程 1 和 线程 2 的 线程 函数 交 蔡 执行 输出 结果 并 
且 变 量 al 的 值 是 按照 顺序 增加 的 。 由 于 当 每 个 线程 进入 临界 区 中 操作 共享 变量 时 ， 另 一 个 
线程 则 只 能 等 待 。 所 以 ， 该 程序 实现 了 同 进程 的 不 同 线程 之 间 的 相互 协调 工作 。 

如 果 用 户 将 临界 区 相关 代码 注释 起 来 ， 再 编译 执行 程序 ， 如 图 3.6 所 示 。 


\ 暴 伟 ( 匆 则 )\12\ 书 中 实例 \ 书 中 垃 何 国 因 局 怠 
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图 3.5 程序 运行 结果 图 3.6 不 含 临界 区 对 象 的 程序 运行 界面 


在 图 3.6 中 ， 用 户 会 发 现 两 个 线程 函数 并 没有 交替 执行 ， 而 且 输出 的 变量 结果 也 未 按 
照 顺 序 增 加 。 所 以 ， 在 线程 同步 中 临界 区 对 象 是 非常 重要 的 。 


2. 使 用 CCriticalSection 类 操作 临界 区 


前 


CCriticalSection 类 是 MFC 中 所 定义 的 临界 区 类 ， 其 作用 与 临界 区 相关 API 函数 实现 
的 功能 一 样 。 本 节 中 ， 将 向 用 户 简要 介绍 该 类 在 实际 编程 中 的 成 员 函 数 以 及 用 法 。 

首先 ， 用户 编程 时 为 了 方便 线程 函数 访问 CCriticalSection 类 对 象 ， 必 须 将 该 对 象 定义 
为 全 局 变量 。 代 码 如 下 : 


CCriticalSection m Sec; // 定 义 全 局 变量 m_sec 
main() 

{ 

// 省 略 部 分 代码 
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} 
然后 ， 调 用 该 类 中 成 员 函 数 LockO 对 临界 
// 锁 定 临界 区 


BOOL Lock(); 


函数 Lock0 的 作用 是 程序 进入 临界 


数 调用 成 功 ， 则 返回 true。 否 则 ， 函 数 返 回 false。 例 如 ， 程 序 根据 该 函数 的 返 
定 临界 区 是 否 成 功 。 代 码 如 下 

ne / /省略 部 分 代码 

if(m Sec.Locket()) // 调 用 函数 锁定 临界 区 

| 

MessageBox ("程序 锁定 临界 区 成 功 ! ") ; ”// 提 示 信 息 

} 
else // 如 果 锁 定 失败 
MessageBox (" 程 序 锁定 临界 区 失败 ! ") ; 
// 省 略 部 分 代码 


如 果 程序 不 再 使 用 临界 区 ， 可 以 调用 成 员 函 数 UnlockO 离 开 临界 


该 函数 原型 如 下 : 
Virtual BOOL Unlock(); 


该 函数 调用 成 功 , 则 返回 tmue。 否则 , 函数 将 返回 false。 例如, 用 广 
类 进行 临界 区 编程 。 代 码 如 下 : 


#include <windows.h> 
#include <stdio.h> 
DWORD WINAPI myfunl( 
LPVOID lpParameter 
); 
DWORD WINAPI myfun2( 
LPVOID lpParameter 
); 
CCriticalSection m Sec; 
int a=0; 
main() 
{ 
HANDLE hl,h27 
hl=: :CreateThread (NULL, 0,myfun]l, NULL, 0, NULL); 
printf ("线程 1 开始 运行 ! \r\n"); 
h2=: :CreateThread (NULL, 0,myfun2, NULL, 0, NULL); 
printf ("线程 2 开始 运行 ! \r\n") 7 
::CloseHandle (hl1) 7 
::CloseHandle (h2) 7 
::Sleep(10000) 7 
return 0; 


// 释 放 临 界 区 


DWORD WINRPI myfunl (LPVOID lpParameter) 
tf 

m Sec.Lock(); 

a+=17 

printf ("%d",a); 


区 执行 相关 功能 并 获得 该 临界 


区 进行 锁定 。 其 原型 如 下 : 


区 的 所 有 权 。 如 果 函 
回 值 判断 锁 


区 并 释放 其 所 有 权 。 


1 使 用 Ccritical Section 


// 包 含 头 文件 
// 声 明 线程 函数 


// 定 义 全 局 变量 m Sec 
// 定 义 全 局 变量 a 


// 定 义 线程 句柄 

// 创 建 线程 1 

// 创 建 线程 2 

// 关 闭 线程 句柄 对 象 


// 程 序 睡眠 10 秒 


7/ 线程 函数 1 


// 锁 定 临界 区 
// 变 量 加 1 
// 输 出 变量 
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m Sec.Unlock(); // 对 临界 区 进行 解锁 

return 0; 
’ 

DWORD WINAPI myfun2 (LPVOID lpParameter) // 线 程 函数 2 

m Sec.Lock(); // 锁 定 临 界 区 

at=1; // 变 量 加 1 

printf("%d",a); // 输 出 变量 

m Sec.Unlock (); // 对 临界 区 进行 解锁 
return 0; 


} 


用 户 使 用 CCriticalSection 类 或 者 临界 区 相关 的 API 函数 进行 临界 区 编程 , 都 可 以 使 线 
程 之 间 实 现 同步 。 在 本 小 节 中 ， 主 要 讲解 了 怎样 使 用 临界 区 对 象 实 现 线程 同步 以 及 与 临界 
区 编程 相关 的 API 函数 和 MFC 类 。 


3.2.2 事件 对 象 


事件 对 象 是 指 用 户 在 程序 中 使 用 内 核对 象 的 有 无 信号 状态 实现 线程 的 同步 。 在 本 节 
中 ， 将 向 用 户 介绍 利用 时 间 对 象 实现 线程 同步 技术 的 相关 API 函数 以 及 MFC 类 。 


1. 使 用 API 函 数 操作 事件 对 象 


用 户 编程 时 ， 使 用 事件 对 象 必须 首先 创建 事件 对 象 。 在 API 函数 中 ， 用 户 可 以 使 用 函 
数 CreateEventO 创 建 并 返回 事件 对 象 。 该 函数 原型 如 下 : 
HANDLE CreateEvent( 
LPSECURITY ATTRIBUTES lpEventAttributes, 
BOOL bManualReset, 
BOOL bInitialstate, 
LPCTSTR lpName 
) 7 
如 果 该 函数 调用 成 功 ， 则 返回 新 创建 的 事件 对 象 。 其 参数 及 意义 如 下 : 
口 参数 lpEventAttributes 是 结构 体 SECURITY_ATTRIBUTES 的 指针 , 表示 新 创建 的 
事件 对 象 的 安全 属性 。 如 果 该 参数 为 NULL， 则 表示 程序 使 用 的 是 默认 安全 属性 。 
口 参数 bManualReset 表示 所 创建 的 事件 对 象 是 人 工 重 置 还 是 自动 重 置 。 如 果 该 参数 
为 tue， 则 表示 程序 所 创建 的 事件 对 象 为 人 工 重 置 对 象 。 如 果 为 flase， 则 表示 创 
建 的 事件 对 象 为 自动 重 置 对 象 。 
口 参数 bmitialState 表示 事件 对 象 的 初始 状态 。 如 果 该 参数 为 tue， 则 表示 该 事件 对 
象 初始 时 为 有 信号 状态 。 否 则 ， 表 示 事 件 对 象 初始 化 时 为 无 信号 状态 。 
口 参数 lpName 表示 事件 对 象 的 名 称 。 如 果 该 参数 为 NULL， 则 表示 程序 创建 的 是 一 
个 匿名 的 事件 对 象 。 
名 注意 : 如 果 参 数 bManualReset 设置 为 tue， 则 表示 当 调用 线程 获得 其 所 有 权 后 ， 用 户 需 
要 显 式 地 调用 函数 ResetEventO 将 时 间 对 象 设置 为 无 信号 状态 。 如 果 为 自动 重 置 
的 事件 对 象 ， 则 系统 会 自动 将 其 设置 为 无 信号 状态 。 所 以 ， 一 般 情 况 下 用 户 编程 
均 将 时 间 对 象 设置 为 自动 重 置 。 
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例如 ， 用 户 创建 一 个 初始 化 状态 为 有 信号 并 且 是 自动 重 置 的 事件 对 象 。 代 码 如 下 : 


HANDLE hevent; // 定 义 事件 对 象 
Hevent=: :CreateEvent (NULL, false, true, NULL); // 创 建 事 件 对 象 
// 省 略 部 分 代码 
在 程序 中 ， 用 户 创建 了 一 个 初始 状态 为 有 信和 号 自动 重 置 并 且 具 有 默认 安全 属性 的 匿名 
事件 对 象 。 


当 用 户 创建 时 间 对 象 时 ， 如 果 将 其 初始 状态 设置 为 无 信号 ， 则 需要 用 户 手 动 将 其 设置 
为 有 信号 状态 。 实 现 该 功能 可 以 调用 函数 SetEvent0 将 指定 的 事件 对 象 设置 为 有 信号 状态 。 
该 函数 原型 如 下 : 


BOOL SetEvent (HANDLE hEvent); 


该 函数 调用 成 功 ， 则 返回 tre。 否 则 ， 将 返回 false。 参 数 hEvent 表示 将 设置 的 事件 对 
象 句 柄 。 与 该 函数 功能 相反 ， 函 数 ResetEventO 则 将 指定 的 事件 对 象 设置 为 无 信号 状态 ， 其 
参数 及 意义 与 函数 SetEventO 相 同 。 

当然 , 线程 也 可 以 通过 调用 函数 WaitForSingleObject0 主 动 请 求 事件 对 象 。 该 函数 原型 
如 下 : 

DWORD WaitForSingleObject( 

HANDLE hHandle, 
DWORD dwMilliseconds 

); 

该 函数 将 在 用 户 指 定 的 事件 对 象 上 等 待 。 如 果 事 件 对 象 处 于 有 信号 状态 , 函数 将 返回 。 
否则 ， 函 数 将 一 直 等 待 ， 直 到 用 户 所 指定 的 时 间 到 达 。 各 参数 及 其 意义 如 下 : 

口 参数 hHandle 表示 函数 所 等 待 的 事件 对 象 句柄 。 

口 参数 dwMilliseconds 表示 该 函数 将 在 事件 对 象 上 的 等 待 时 间 ， 如 果 该 参数 为 

INFINITE, 则 该 函数 将 永远 等 待 。 该 函数 的 返回 值 可 以 表明 引起 函数 返回 的 原因 ， 
其 部 分 返回 值 如 表 3.2 所 示 。 


表 3.2 函数 部 分 返回 值 


用 户 指定 的 等 待 时 间 已 过 
WAIT OBJECT 0 线程 所 请 求 的 对 象 为 有 信号 状态 
例如 ， 用 户 使 用 事件 对 象 实现 线程 同步 编程 。 代 码 如 下 : 
#include <windows.h> // 包 含 头 文件 
#include <stdio.h> 
DWORD WINAPI myfunl ( // 声 明 线程 函数 


LPVOID lpParameter 
); 
DWORD WINAPI myfun2( 
LPVOID lpParameter 
jn 


HANDLE hevent; // 定 义 全 局 变量 hevent 
int a=0; // 定 义 全 局 变量 a 
main() 


第 3 章 多 线程 与 异步 套 接 字 编程 


HANDLE hl,h2; // 定 义 线程 句柄 
hevent=: :CreateEvent (NULL, FALSE, false, NULL); 
::SetEvent (hevent); 
hl=: :CreateThread (NULL, 0, myfunl, NULL, 0, NULL) ; // 创 建 线程 1 
printf ("线程 1 开始 运行 ! \r\n"); 
h2=: :CreateThread (NULL, 0, myfun2, NULL, 0, NULL) ; // 创 建 线程 2 
printf ("线程 2 开始 运行 ! \r\n"); 


::CloseHandle (hl1) 7 // 关 闭 线程 句柄 对 象 
::CloseHandle (h2) 7 
::Sleep(10000) 7 // 程 序 睡眠 10 秒 
return 07 
} 
DWORD WINAPI myfun]l (LPVOID lpParameter) // 线 程 函 数 1 
while(1) 
{ 
: :WaitForSingleObject (hevent, INFINITE); // 请 求 事件 对 象 
: :ResetEvent (hevent); // 设 置 事件 对 象 为 无 信号 状态 
if(a<10000) 
{ 
a+=17 // 变 量 自 加 
::Sleep (1000); // 线 程 睡眠 1 秒 
printf (" 线 程 1: $d\r\n",a); // 输 出 变量 
: :SetEvent (hevent) 7 // 设 置 事件 对 象 为 有 信号 状态 
else 
{ 
::SetEvent (hevent); // 设 置 事件 对 象 为 有 信号 状态 
break; // 跳 出 循环 
} 
} 
return 0; 
} 
DWORD WINAPI myfun2 (LPVOID lpParameter) // 线 程 函数 2 
{ 
while(1) 
{ 
: :WaitForSingleObject (hevent, INFINITE); // 请 求 事件 对 象 
: :ResetEvent (hevent); // 设 置 事件 对 象 为 无 信号 状态 
if(a<10000) 
上 
a+=17 
::Sleep(1000); 
printf ("线程 2: %$d\r\n",a); // 输 出 变量 
: :SetEVent (hevent); 
} 
else 
E 
::SetEvent (hevent); // 设 置 事件 对 象 为 有 信号 状态 
break; // 跳 出 循环 
. 
} 
return 0; // 线 程 正常 退出 


} 


在 代码 中 , 用 户主 要 使 用 了 函数 WaitForSingleObject0 对 事件 对 象 进行 请 求 , 然后 再 使 
用 事件 对 象 相关 API 函数 设置 其 有 无 信号 状态 。 实 例 程 序 根据 事件 对 象 的 信号 状态 判断 线 
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程 的 执行 顺序 以 及 输出 全 局 变量 a 的 值 ， 如 图 3.7 所 示 。 


腑 伟 ( 勾 副 )\12\ 书 中 实 ..- 国 吕 牟 


图 3.7 事件 对 象 实现 线程 同步 


在 本 小 节 中 ， 向 用 户 介 绍 了 事件 对 象 编程 的 相关 API 函数 的 原型 以 及 参数 意义 ， 并 配 
合 实例 程序 讲解 了 这 些 API 函数 的 使 用 方法 。 


2. 使 用 CEvent 类 实现 线程 同步 


CEvent 类 是 MFC 中 支持 事件 对 象 编程 的 类 。 本 小 节 将 向 用 户 讲解 该 类 实现 线程 同步 
技术 的 部 分 常用 函数 以 及 使 用 方法 。 
首先 ， 用 调用 该 类 构造 函数 创建 对 象 。 构 造 函数 原型 如 下 : 
CEvent ( BOOL bInitiallyOwn = FALSE, BOOL bManualReset = FALSE, LPCTSTR 
lpszName = NULL, LPSECURITY ATTRIBUTES lpsaAttribute = NULL ); 
在 构造 函数 中 ， 参 数 及 其 意义 如 下 : 
口 参数 bInitiallyOwn 表示 事件 对 象 的 初始 化 状态 。 如 果 该 参数 为 tue， 则 表示 该 事 
件 对 象 为 有 信号 状态 。 和 否则 ， 该 事件 对 象 为 无 信号 状态 。 默 认为 无 信号 状态 。 
口 参数 bManualReset 表示 该 事件 对 象 是 人 工 重 置 还 是 自动 重 置 对 象 。 如 果 该 参数 为 
true， 则 事件 对 象 为 人 工 重 置 。 否 则 ， 事 件 对 象 为 自动 重 置 。 
口 参数 lpszName 表示 用 户 为 该 事件 对 象 的 命名 。 默 认 情况 下 为 NULL。 
口 参数 lpsaAttribute 表示 该 事件 对 象 的 安全 属性 。 一般 情 况 下 , 创建 的 事件 对 象 均 指 
定 为 默认 安全 属性 。 
例如 ， 用 户 使 用 CEvent 类 创建 对 象 。 代 码 如 下 : 
区 // 省 略 部 分 代码 
CEvent event (true, false,NULL,NULL); // 创 建 事件 类 对 象 
将 事件 对 象 设置 为 有 信号 或 无 信号 状态 可 以 分 别 调用 函数 SetEvent0 和 ResetEvent()。 
函数 原型 如 下 : 
BOOL SetEvent( ); // 设 置 事 件 对 象 为 有 信号 
BOOL ResetEvent( ); // 设 置 事件 对 象 为 无 信号 
以 上 两 个 函数 若 调用 成 功 ， 则 返回 tue。 和 否则， 将 返回 false。 例 如 ， 用 户 使 用 CEvent 
类 在 程序 中 实现 线程 同步 。 代 码 如 下 : 
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#include <windows.h> 
#include <stdio.h> 
DWORD WINAPI myfunl( 
LPVOID lpParameter 
De WINAPI myfun2( 
LPVOID lpParameter 
); 
CEvent event; 
int a=0; 
main() 
{ 
event=CEvent (false, false, NULL, NULL); 
HANDLE hl,h2; 
event=: :CreateEvent (NULL, FALSE, false, NULL); 
eVent .SetEvent (); 
hl=: :CreateThread (NULL, 0,myfun]l, NULL, 0, NULL); 
printf ("线程 1 开始 运行 ! \r\n"); 
h2=: :CreateThread (NULL, 0,myfun2, NULL, 0, NULL); 
printf ("线程 2 开始 运行 ! \r\n"); 
::CloseHandle (hl1); 
::CloseHandle (h2); 
::Sleep(10000); 
return 07 
} 
DWORD WINAPI myfunl (LPVOID lpParameter) 


while(1) 
{ 


: :WaitForSingleObject (event.m hObject, INFINITE); 


event .ResetEvent (); 
if(a<10000) 
{ 
a+=17 
::Sleep(1000); 
printf ("线程 1: $d\r\n",a); 
event.SetEvent (); 


else 
{ 
event .SetEvent (); 
break; 
} 
E 
return 0; 
} 
DWORD WINRPI myfun2 (LPVOID lpParameter) 
Lt 
while (1) 
{ 


: :WaitForSingleObject (event.m hObject, INFINITE); 


event .ResetEvent (); 
if(a<10000) 
上 
af+=17 
::Sleep(1000); 
printf ("线程 2: %$d\r\n",a); 


// 包 含 头 文件 
// 声 明 线程 函数 


// 将 事件 对 象 定 义 为 全 局 变量 
// 定 义 全 局 变量 a 


// 定 义 线程 句柄 


// 创 建 线程 1 
// 创 建 线程 2 


// 关 闭 线程 句柄 对 象 
// 程 序 睡眠 10 秒 


// 线 程 函数 1 


// 请 求 事件 对 象 
// 设 置 事件 对 象 为 无 信号 状态 


// 变 量 自 加 

// 线 程 睡眠 1 秒 

// 输 出 变量 

// 设 置 事件 对 象 为 有 信号 状态 


// 设 置 事件 对 象 为 有 信号 状态 
// 跳 出 循环 


// 线 程 


// 线 程 函数 2 


// 请 求 事件 对 象 
// 设 置 事件 对 象 为 无 信号 状态 


// 输 出 变量 
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event .SetEvent () 7 
1 


else 

{ 
event -SetEvent () 7 // 设 置 事件 对 象 为 有 信号 状态 
break; // 跳 出 循环 

| 
return 0; // 线 程 正常 退出 


} 


在 上 面 的 程序 中 ， 用 户主 要 使 用 了 CEvent 类 的 相关 函数 实现 线程 的 同步 。 本 小 节 主 
日 户 讲解 如 何 使 用 API 函数 或 者 CEvent 类 创建 事件 对 象 ， 实 现 线程 同步 技术 的 相关 


3 互 斥 对 象 


互 斥 对 象 与 前 面 所 学 的 临界 区 对 象 和 事件 对 象 的 作用 一 样 ， 均 用 于 实现 线程 同步 。 但 
互 斥 对 象 还 可 以 在 进程 之 问 使 用 。 在 互 斥 对 象 中 ， 包 含 一 个 线程 ID 和 一 个 计数 器 。 


线程 ID 表示 拥有 该 互 斥 对 象 的 线程 ， 计 数 器 用 于 表示 该 互 斥 对 象 被 同一 线程 所 使 有 的 次 


数 。 


在 程序 中 ， 同 样 可 以 使 用 API 函数 或 者 MFC 类 操作 互 斥 对 象 ， 实 现 线程 同步 。 
1， 使 用 API 函 数 操作 互 斥 对 象 
用 户 可 以 调用 API 函数 CreateMutex0 创 建 并 返回 互 斥 对 象 。 该 函数 原型 如 下 : 


HANDLE CreateMutex( 

LPSECURITY ATTRIBUTES lpMutexAttributes, 
BOOL bInitialOwner, 

LPCTSTR lpName 

); 


如 果 该 函数 调用 成 功 ， 将 返回 新 创建 的 互 斥 对 象 句柄 。 否 则 ， 将 返回 NULL。 各 参数 


及 其 意义 如 下 : 


口 参数 pMutexAttributes 指定 新 创建 互 斥 对 象 的 安全 属性 。 如 果 该 参数 为 NULL, 表 
示 互 斥 对 象 拥有 默认 的 安全 属性 。 

口 参数 bInitialOwner 表示 该 互 斥 对象 的 拥有 者 。 如 果 为 tue， 则 表示 创建 该 互 斥 对 
象 的 线程 拥有 其 所 有 权 。 如 果 为 false， 表 示 创 建 互 斥 对 象 的 线程 不 能 拥有 该 互 斥 
对 象 的 所 有 权 。 

口 参数 pName 表示 互 斥 对 象 的 名 称 。 若 该 参数 为 NULL， 则 表示 程序 创建 的 是 匿名 
对 象 。 如 果 用 户 为 该 参数 指定 值 ， 则 在 程序 中 可 以 调用 函数 OpenMutex0 打 开 一 个 
命名 的 互 斥 对 象 。 

例如 ， 用 户 创 建 一 个 匿名 的 互 斥 对 象 ， 代 码 如 下 : 


HANDLE hmutex; // 声 明 互 斥 对 象 句柄 
hmutex=: :CreateMutex (NULL, FALSE, NULL) : // 创 建 互 斥 对 象 并 返回 其 句柄 
ee // 省 略 部 分 代码 


线程 使 用 完 该 互 斥 对 象 以 后 ， 用 户 应 该 调用 函数 ReleaseMutexO 释 放 对 该 互 太 对 象 的 
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所 有 权 ， 也 就 是 让 互 斥 对 象 处 于 有 信号 状态 。 函 数 ReleaseMutex0 的 原型 如 下 : 


BOOL ReleaseMutex (HANDLE hMutex); 


如 果 该 函数 调用 成 功 ， 则 返回 true。 否 则 ， 将 返回 false。 参 数 hMutex 表示 将 释放 的 
互 斥 对 象 句柄 .。 例如 , 用 户 将 上 面 创建 的 互 斥 对 象 句柄 hmutex 与 调用 该 句柄 的 线程 进行 分 
离 。 代 码 如 下 : 

RR // 省 略 部 分 代码 

: :ReleaseMutex (hmutex) 7 // 释 放 互 斥 对 象 句柄 

在 互 斥 对 象 中 , 线程 也 可 以 调用 函数 WaitForSingleObject0 对 该 对 象 进行 请 求 。 当 互 斥 
对 象 无 信号 时 , 该 函数 将 一 直 等 待 , 直到 该 互 斥 对 象 有 信号 或 用 户 所 指定 的 等 待 时 间 已 过 。 
否则 ， 该 函数 将 返回 。 由 于 这 个 函数 在 3.2.2 节 中 已 经 详细 讲解 ， 所 以 在 这 里 不 再 歼 述 。 
如 果 用 户 对 该 函数 不 了 解 ， 请 复习 前 面 的 相关 知识 。 

例如 ， 用 户 使 用 互 斥 对 象 实现 线程 的 同步 ， 代 码 如 下 : 


#include <windows .h> // 包 含 头 文件 
#include <stdio.h> 
DWORD WINAPI myfunl ( // 声 明 线程 函数 


LPVOID lpParameter 
); 
DWORD WINAPI myfun2( 
LPVOID lpParameter 


); 
HANDLE hmutex; 


int a=0; // 定 义 全 局 变量 a 

main() 

i 

hmutex=: :CreateMutex (NULL, FALSE, NULL); // 创 建 互 斥 对 象 并 返回 其 句柄 
HANDLE hl,h27 // 定 义 线程 句柄 


hl=: :CreateThread (NULL, 0,myfunl, NULL, 0, NULL); // 创 建 线程 1 
printf ("线程 1 开始 运行 ! \r\n"); 
h2=: :CreateThread (NULL, 0,myfun2, NULL, 0, NULL) ; // 创 建 线程 2 
printf ("线程 2 开始 运行 ! \r\n"); 


::CloseHandle (h1); // 关 闭 线程 句柄 对 象 
::CloseHandle (h2); 
::Sleep (10000); // 程 序 睡眠 10 秒 
return 07 
DWORD WINRPI myfun]l (LPVOID lpParameter) // 线 程 函数 1 
while(1) 
{ 
: :WaitForSingleObject (hmutex, INFINITE); // 请 求 互 斥 对 象 
if(a<10000) 
{ 
a+=17 // 变 量 自 加 
::Sleep(1000); // 线 程 睡眠 1 秒 
printf ("线程 1: %d\r\n",a); 
::ReleaseMutex (hmutex); // 释 放 互 斥 对 象 句柄 
} 
else 


[| 
: :ReleaseMutex (hmutex); // 释 放 互 斥 对 象 句柄 
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break; // 跳 出 循环 
} 
return 0; 
} 
DWORD WINAPI myfun2 (LPVOID lpParameter) // 线 程 函 数 2 
L 
while (1) 
{ 
: :WaitForSingleObject (hmutex, INFINITE); // 请 求 互 斥 对 象 
if(a<10000) 
1 
a+=17 
::Sleep(1000) 7 
printf(" 线 程 2: $d\r\n",a); // 输 出 变量 
: :ReleaseMutex (hmutex) 7 // 释 放 互 斥 对 象 句柄 
} 
SLse 
{ 
: :ReleaseMutex (hmutex); // 释 放 互 斥 对 象 句柄 
break; // 跳 出 循环 
} 
| 
return 0; // 线 程 正常 退出 
} 


在 程序 中 ， 用 户 首先 创建 互 斥 对 象 并 返回 其 句柄 。 
然后 利用 该 互 斥 对 象 句柄 实现 线程 1 和 线程 2 的 同步 并 
输出 全 局 变量 a 的 值 ， 如 图 3.8 所 示 。 

很 注意 : 当 用 户 使 用 互 斥 对 象 编程 时 ， 应 该 牢记 互 斥 对 
象 的 使 用 方法 是 哪个 线程 拥有 其 所 有 权 ， 哪 个 
线程 就 应 该 释放 该 互 斥 对 象 。 


2. 使 用 CMutex 类 


ee | 


CMutex 类 是 MFC 中 的 互 斥 对 象 类。 该 类 是 由 
CSyncObject 类 派生 而 来 ， 所 以 使 用 CMutex 类 时 可 以 调 “图 3.8 使 用 互 斥 对 象 实现 线程 同步 
用 其 父 类 CSyneObiject 中 的 成 员 函 数 实现 指定 功能 。 在 本 小 节 中 ,将 向 用 户 讲解 使 用 CMutex 
类 实现 线程 同步 技术 的 方法 。 
首先 ， 创 建 CMutex 类 对 象 是 通过 其 构造 函数 实现 的 。 构 造 函数 原型 如 下 
CMutex (BOOL bInitiallyOwn=FALSE, LPCTSTR lpszName=NULL, LPSECURITY_ ATTRIB- 
UTES lpsaAttribute = NULL ); 
该 函数 的 作用 是 构造 CMutex 类 的 实例 对 象 。 其 参数 及 意义 如 下 
口 参数 bmitiallyOwn 表示 调用 线程 是 否 拥有 所 创建 的 互 斥 对 象 。 如 果 为 tue， 则 表 
示 创 建 该 互 斥 对 象 的 线程 拥有 其 所 有 权 。 如 果 为 好 lse， 表 示 创 建 互 斥 对 象 的 线程 
不 能 拥有 该 互 斥 对 象 的 所 有 权 。 
口 参数 pName 表示 互 斥 对 象 的 名 称 。 若 该 参数 为 NULL， 则 表示 程序 创建 的 是 匿名 
对 象 。 
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口 参数 lpMutexAttributes 指定 新 创建 互 斥 对 象 的 安全 属性 。 如果 该 参数 为 NULL, 表 


示 互 斥 对 象 拥有 默认 的 安全 属性 。 
例如 ， 用 户 通过 CMutex 类 创建 一 个 互 斥 对 象 。 代 码 如 下 : 
有 // 省 略 部 分 代码 
CMutex mex (FALSE, NULL, NULL); / /创建 互 斥 对 象 
: // 省 略 部 分 代码 


用 户 创建 互 斥 对 象 成 功 之 后 ， 可 以 在 线程 函数 中 调用 函数 Lock0 和 UnlockO 对 该 互 斥 
对 象 所 保护 的 区 域 进行 锁定 和 和 解锁， 控制 其 他 线程 对 保护 区 域 的 访问 权限 。 这 两 个 函数 的 
原型 如 下 : 

Virtual BOOL Lock( DWORD dwTimeout = INFINITE); 

VirtualBOOL Unlock (LONG lCount,LPLONG lpPrevCount=NULL); 

其 中 ， 函 数 LockO 的 作用 是 锁定 保护 区 域 的 数据 ， 避 免 其 他 线程 对 该 区 域 数据 进行 访 
问 ， 并 且 将 互 斥 对 象 设置 为 无 信号 。 如 果 该 函数 调用 成 功 ， 则 返回 tue， 和 否则 返回 false。 
其 参数 dwTimeout 表示 该 互 斥 对 象 变 为 有 信号 状态 的 时 间 。 如 果 为 INFINITE， 则 表示 该 
函数 将 一 直 等 待 ， 直 到 互 斥 对 象 变 为 有 信号 状态 。 

函数 UnlockO 的 作用 是 解除 对 保护 区 域 数 据 的 锁定 , 并 将 互 斥 对 象 设置 为 有 信号 状态 。 
如 果 该 函数 调用 成 功 ， 则 返回 tue， 否 则 返回 false。 其 参数 1Count 是 默认 参数 ， 用 户 在 使 
用 时 可 以 不 为 其 指定 值 。 参 数 pPrevCount 也 是 默认 参数 ， 默 认为 NULL。 

例如 ， 用 户 在 程序 中 使 用 CMutex 类 创建 互 斥 对 象 实现 线程 同步 。 代 码 如 下 : 


#include <windows .h> // 包 含 头 文件 
#include <stdio.h> 
DWORD WINAPI myfunl( // 声 明 线程 函数 


LPVOID lpParameter 
); 
DWORD WINAPI myfun2( 
LPVOID lpParameter 
a 


CMutex hmutex (NULL, FALSE,NULL); // 定 义 全 局 互 斥 对 象 
int a=07 // 定 义 全 局 变量 a 
main() 
{ 

HANDLE hl,h2; // 定 义 线程 句柄 


hl=: :CreateThread (NULL, 0,myfunl, NULL, 0, NULL) ; // 创 建 线程 1 
printf ("使 用 CMutex 类 实现 线程 同步 \r\n"); 

printf ("线程 1 开始 运行 ! \r\n"); 

h2=: :CreateThread (NULL, 0,myfun2, NULL, 0, NULL) ; // 创 建 线程 2 

printf ("线程 2 开始 运行 ! \r\n"); 


::CloseHandle (h1); // 关 闭 线程 句柄 对 象 
::CloseHandle (h2); 
::Sleep (10000); // 程 序 睡眠 10 秒 
return 0; 
} 
DWORD WINAPI myfunl (LPVOID lpParameter) // 线 程 函数 1 
{ 
while(1) 
{ 
hmutex.Lock (INFINITE); // 锁 定 互 斥 对 象 
if(a<10000) 


第 1 篇 。 Visual C++ 网 络 编程 基础 


昌 
a+=17 // 变 量 自 加 
: :Sleep(1000)7 // 线 程 睡眠 1 秒 
Printf(" 线 程 1: %$d\r\n",a); 
hmutex.Unlock (0,0); // 释 放 互 斥 对 象 
和 
else 
t 
hmutex.Unlock (0,0); / /释放 互 斥 对 象 
break; // 跳 出 循环 
} 
return 0; 
} 
DWORD WINAPI myfun2 (LPVOID lpParameter) // 线 程 函 数 2 
{ 
while(1) 
{ 
hmutex.Lock (INFINITE); // 锁 定 互 斥 对 象 
if(a<10000) 
{ 
at+=1; 
::Sleep(1000); 
printf ("线程 2: $d\r\n",a); // 输 出 变量 
hmutex.Unlock (0,0); // 释 放 互 斥 对 象 
} 
else 
{ 
hmutex.Unlock(0,0); /释放 互 斥 对 象 
break; // 跳 出 循环 
} 
return 0; // 线 程 正常 退出 
} 


在 程序 中 ， 用 户 首先 定义 了 CMutex 类 的 全 局 对 象 ， 然 后 创建 两 个 线程 并 在 线程 函数 
中 调用 函数 Lock0 和 UnlockO 实 现 线程 同步 。 该 程序 的 运行 结果 如 图 3.9 所 示 。 


图 3.9 使 用 CMutex 类 实现 线程 同步 
以 上 程序 实现 了 在 同一 进程 中 的 线程 同步 ， 但 是 在 前 面 的 内 容 中 向 用 户 介绍 过 互 斥 对 
象 还 可 以 在 进程 之 间 使 用 。 如 果 用 户 在 进程 中 通过 创建 互 斥 对 象 实现 程序 实例 的 唯一 运行 ， 
代码 如 下 : 
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#include<windows.h> // 包 含 头 文件 
#include<stdio.h> 
main () // 主 函数 
HANDLE hmutex; /定义 互 斥 对 象 句柄 
hmutex=: :CreateMutex (NULL, true, "VC 网 络 编程 ") ; /创建 互 斥 对 象 并 返回 其 句柄 
if (hmutex) // 判 断 创建 互 斥 对 象 是 否 成 功 
if (ERROR ALREADY EXISTS==GetLastError()) // 获 取 错 误 
{ 
printf ("只 允许 一 个 实例 程序 运行 ! \r\n"); // 打 印 相 关 信息 
} 
else 


{ 
printf ("实例 程序 运行 成 功 ! \r\n"); 
} 
} 


::ReleaseMutex (hmutex); // 释 放 互 斥 对 象 句柄 
::Sleep(100000); // 使 程序 睡眠 100 秒 
return 0; // 程 序 正常 结束 


} 

在 代码 中 ， 用 户 首先 创建 互 斥 对 象 ， 然 后 使 用 函数 
GetLastError0 获 取 错 误 信息 。 如 果 获 取 到 的 错误 信息 是 
ERROR_ALREADY_EXISTS, 则 说 明 程序 已 经 有 一 个 实例 在 
运行 了 。 该 程序 的 运行 结果 如 图 3.10 所 示 。 

在 本 小 节 中 , 主要 向 用 户 介绍 了 使 用 API 函数 和 CMutex 
类 创建 互 斥 对 象 以 及 使 用 互 斥 对 象 实现 线程 同步 的 方法 。 图 3.10 “实例 程序 运行 唯一 性 


进程 问 通信 是 指 在 系统 中 两 个 或 多 个 进程 之 问 通过 第 三 方 进行 数据 共享 。 用 户 在 实际 
编程 中 ， 除 了 可 以 使 用 套 接 字 进行 网 络 通信 以 外 ， 还 可 以 使 用 进程 间 的 通信 方式 实现 网 络 
通信 。 例 如 ， 邮 槽 、 命 名 管道 等 。 

在 Windows 操作 系统 中 ， 当 每 个 进程 启动 时 ， 系 统 都 会 为 其 分 配 大 约 4GB 的 私有 地 
址 空间 。 由 于 每 个 进程 的 地 址 空间 是 私有 的 ， 所 以 进程 之 问 不 能 互相 访问 对 方 的 数据 。 但 
是 ,在 Windows 操作 系统 中 已 经 为 用 户 提供 了 多 种 进程 通信 机 制 。 例 如 ， 邮 槽 、 匿 名 管道 
等 。 在 本 节 中 ， 将 主要 向 用 户 介绍 这 些 通信 机 制 的 用 法 以 及 实现 方法 等 。 


3.3.1 邮 模 


邮 槽 是 Windows 系统 提供 的 一 种 单 向 通信 的 机 制 。 即 进程 中 的 一 方 只 能 写 入 或 读 取 数 
据 ， 而 另 一 方 则 只 能 读 取 或 写 入 数据 。 通 过 邮 槽 ， 用 户 可 以 实现 一 对 多 或 跨 网 络 的 进程 之 
间 的 通信 。 但 是 ， 邮 槽 能 传输 的 数据 非常 小 ， 一 般 在 400KB 左右 。 如 果 用 户 操作 的 数据 过 
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大 ， 可 能 会 导致 邮 槽 不 能 正常 工作 。 
1. 创建 邮 模 


用 户 在 实际 编程 时 ， 可 以 使 用 Windows 邮 槽 实现 进程 间 通 信 。 但 是 ,用 户 必 须 首先 创 
建 邮 槽 。 在 Windows 操作 系统 中 ， 用 户 可 以 通过 函数 CreateMailslot0 创 建 邮 槽 。 该 函数 原 
型 如 下 : 
HANDLE CreateMailslot( 
LPCTSTR lpName, 
DWORD nMaxMessageSize, 
DWORD lReadTimeout, 
LPSECURITY ATTRIBUTES lpSecurityAttributes 
) 7 
该 函数 的 作用 是 创建 邮 模 并 返回 该 邮 槽 的 句柄 。 如 果 该 函数 调用 成 功 ， 将 返回 创建 邮 
槽 的 句柄 。 和 否则 ， 函 数 将 返回 INVALID_HANDLE VALUE， 表示 创建 邮 槽 失败 。 其 参数 
及 意义 如 下 : 

口 参数 lpName 表示 邮 槽 的 名 称 。 邮 槽 名 称 的 格式 为 “\\mailslotname”。 其 中 , name 
表示 邮 槽 的 名 称 。 用 户 在 VC 中 使 用 该 参数 时 ， 应 该 将 其 指定 为 “WW\\\mailslot\\ 
name”。 如 果 用 户 是 在 不 同 的 主机 上 运行 程序 ， 则 需要 将 名 称 字符 串 中 的 “.” 换 
成 对 方 主机 名 称 。 

口 参数 nMaxMessageSize 指定 将 通过 邮 模 发 送 或 接收 的 消息 大 小 的 最 大 值 。 用 户 在 
实际 编程 时 ， 一 般 将 该 参数 设置 为 0， 表示 消息 的 大 小 为 任意 值 。 

口 参数 IReadTimeout 表示 程序 读 取 操作 的 超时 时 间 。 如 果 该 参数 值 为 0， 则 当 邮 村 
中 没有 任何 消息 时 ， 该 函数 将 立即 返回 。 如 果 该 参数 值 为 MAILSLOT_WAIT_ 
FOREVER， 则 表示 该 函数 将 等 待 ， 直 到 邮 槽 中 有 消息 ， 函 数 才 会 返回 。 

口 参数 lpSecurityAttributes 是 指向 结构 体 SECURITY _ATTRIBUTES 的 指针 , 表示 邮 
槽 的 安全 属性 。 一 般 情 况 下 ， 用 户 将 该 参数 值 指定 为 NULL， 表 示 邮 模 使 用 默认 
的 安全 属性 。 

一 般 情 况 下 ， 函 数 CreateMailslot0 常 被 使 用 在 进程 通信 的 服务 器 方 。 在 客户 端 则 使 用 

函数 CreateFile0 打 开 指 定 的 邮 槽 之 后 ， 再 进行 相关 的 操作 。 


全 注意 : 在 本 节 中 ， 将 通过 邮 模 读 取 数据 的 通信 一 方 称 为 服务 器 ， 而 通过 邮 楷 写 入 数据 的 
一 方 称 为 客户 端 。 
例如 ， 用 户 分 别 在 服务 器 和 客户 端 上 创建 邮 槽 和 打开 邮 槽 。 服 务 器 端 创建 邮 槽 的 代码 
如 下 : 


了 // 省 略 部 分 代码 
HANDLE mail; // 定 义 邮 槽 句柄 
mail=CreateMailslot("\\\\.\\mailslot\\mysolt",0， MAILSLOT WAIT FOREVER 
ULL) // 创 建 邮 槽 
if (mail==INVALID HANDLE VALUE) // 判 断 邮 槽 句柄 

MessageBox (" 创 建 邮 槽 失败 ! ") 7 // 提 示 信 息 

j 

// 省 略 部 分 代码 
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// 客 户 端 打开 邮 模 
a // 省 略 部 分 代码 
HANDLE mail2; // 定 义 文件 句柄 
mail2=CreateFile("\\\\.\\mailslot\\mysolt", GENERIC WRITE， FILE SHARE 
READ, NULL, OPEN EXISTING, FILE ATTRIBUTE NORMAL,NULL); // 打 开 文 件 
if (mail2== INVALID HANDLE VALUE) 
| 

MessageBox (" 打 开 邮 槽 失败 ! "); 

} 

Ss // 省 略 部 分 代码 


用 户 首先 在 服务 器 方 创建 邮 模 “\NNmailslotmysolt”。 然 后 ， 再 在 客户 端 创建 并 打开 
与 该 邮 槽 相关 联 的 文件 。 


外 注意 : 如 果 用 户 需要 在 程序 中 既 能 读 取 数据 又 能 写 入 数据 ， 则 只 需要 在 程序 中 同时 实现 
服务 器 与 客户 端的 功能 即 可 。 


2. 操作 邮 模 

用 户 对 邮 模 进行 操作 包括 将 数据 写 入 邮 模 和 从 邮 模 中 读 取 数 据 等 。 在 实际 编程 时 ， 用 
户 操 作 邮 槽 与 操作 文件 一 样 ， 都 是 通过 调用 函数 ReadFile0 和 WriteFile0 进 行 读 写 操作 。 例 
如 ， 用 户 在 服务 器 方 通过 邮 模 读 取 数据 ， 而 在 客户 端 通过 邮 槽 写 入 数据 。 代 码 如 下 : 

// 服 务 器 方 读 取 数据 


二 // 省 略 部 分 代码 
char text[200]7 // 定 义 字符 数组 
DWORD readtext; // 用 于 获取 实际 读 取 值 
if (ReadFile (mail, text, 200, greadtext, NULL)) // 读 取 数 据 
{ 

MessageBox (text); // 显 示 数 据 

} 

else 
1 

MessageBox ("数据 读 取 失 败 !") ; 

} 
区 // 省 略 部 分 代码 
// 客 户 端 写 入 数据 
本 // 省 略 部 分 代码 
char text[]="this is a message"; // 初 始 化 消息 
DWORD writetext; // 用 于 获取 实际 发 送 值 
if (WriteFile (mail2, text, sizeof (text), gwritetext, NULL) ) // 写 入 数据 
{ 

MessageBox ("数据 写 入 成 功 ") ; // 数 据 写 入 成 功 

} 
else 


{ 
MessageBox ("数据 写 入 失败 ") ; 
} 


// 省 略 部 分 代码 


在 以 上 代码 中 ， 用 户 实现 了 简单 的 邮 模 操作。 用 户 在 程序 中 使 用 完 邮 槽 之 后 ， 必 须 调 
用 函数 CloseHandle0 将 创建 的 邮 槽 关闭 。 


。57。 


第 1 篇 ”Visual C++ 网 络 编程 基础 


3. 邮 模 实例 


首先 ， 在 VC 中 创建 一 个 基于 控制 台 程序 的 窗口 工程 ， 名 称 为 “ 邮 槽 实例 ”。 然 后 ， 
在 该 工程 中 添加 一 个 C++ 源 文件 ， 名 称 修改 为 “服务 器 ”并 添加 代码 。 邮 槽 服务 器 代码 
如 下 : 


#include<windows.h> // 包 含 头 文件 
#include<stdio.h> 
main () // 主 函数 

{ 
HANDLE mail; // 定 义 邮 槽 句柄 
mail=CreateMailslot ("\\\\.\\mailslot\\mysolt",0,MAILSLOT WAIT FOREVER, 
NULL); // 创 建 邮 模 
if (mail==INVALID HANDLE VALUE) // 判 断 邮 槽 句柄 

printf (" 创 建 邮 槽 失败 ! \rz\n") // 提 示 信 息 

CloseHandle (mail); 

} 
ELSe 
E 
printf ("创建 邮 权 成 功 ， 正 在读 取 数 据 …*…! \r\n"); 
char text[200]; // 定 义 字符 数组 
DWORD readtext; // 获 取 实 际 读 取 值 
if (ReadFile (mail, text, 200, greadtext, NULL)) // 读 取 数据 
{ 
printf (text); // 显 示 数 据 
} 

else 


{ 
printf("\r\n 数据 读 取 失败 !\r\n"); 
yy 


CloseHandle (mail); // 关 闭 邮 模 
Sleep(1000) 7 
return 07 


} 


将 上 面 的 代码 编译 后 生成 邮 槽 服务 器 程序 。 再 在 工程 中 添加 一 个 C++ 源 文件 ， 名 称 修 
改 为 “客户 端 ” 并 添加 代码 。 客 户 端 代码 如 下 : 


#include<windows.h> // 包 含 头 文件 
#include<stdio.h> 

main () // 主 函数 

I 

HANDLE mail2; // 定 义 邮 档 句柄 
char text [] =" 您 好 ，this is a message"; // 初 始 化 消息 
DWORD writetext; // 获 取 实 际 发 送 值 


mail2=CreateFile("\\\\.\\mailslot\\my",GENERIC WRITE,FILE SHARE READ, 
NULL, OPEN EXISTING,FILE ATTRIBUTE NORMAL, NULL); 


// 打 开 文 件 
if (INVALID HANDLE VALUE==-mail2) 


Printf(" 邮 槽 打开 失败 ! \r\n"); 
} 


else 


。58 。 


if (WriteFile (mail2, text, sizeof (text), gwritetext, NULL)) // 写 入 数据 


Sleep (1000); 
printf ("数据 写 入 成 功 \r\n"); / /数据 写 入 成 功 


} 


CL5e 


printf ("数据 写 入 失败 \r\n"); 


} 


CloseHandle (mail2); // 关 闭 句柄 


} 


Sleep(10000); 
return 0; 


| 


当 用 户 实现 了 邮 模 服务 器 和 邮 覃 客户 端的 相关 功 


能 ， 便 可 以 编译 并 运行 邮 模 服务 器 和 邮 槽 客户 端 ， 如 
图 3.11 所 示 。 


创建 邮 槽 。 然 后， 再 使 用 客户 端 打开 邮 档 写 入 » 


“E:\ 委 伟 ( 匆 到 ) \12\ 书 中 实生 = 同 电 马 | 


县 注意 : 在 邮 档 实例 中 ， 用户 必 须 首先 打开 服务 器 程序 国 - 


数据 。 如 果 用 户 将 两 个 程序 打开 的 顺序 弄 反 ， 


则 会 导致 程序 功能 发 生 错 误 。 


图 3.11 邮 模 实例 程序 运行 结果 


3.3.2 ”命名 管道 


命名 管道 是 一 种 不 但 能 在 同一 机 器 上 实现 两 个 进程 通信 ， 还 能 在 网 络 中 不 同 机 器 上 的 
两 个 进程 之 间 通 信 的 机 制 。 与 邮 槽 不同 ， 命 名 管道 传输 数据 是 采取 基于 连接 并 且 可 靠 的 传 
输 方式 ， 所 以 命名 管道 传输 数据 只 能 一 对 一 进行 传输 。 在 本 节 中 ， 将 主要 向 用 户 介绍 命名 
管道 的 使 用 方法 。 


1. 创建 命名 管道 


用 户 创建 命名 管道 可 以 调用 函数 CreateNamedPipe0 进 行 创建 。 该 函数 原型 如 下 : 


HANDLE CreateNamedPipe( 
LPCTSTR lpName, 


DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 


dwOopenMode, 
dwPipeMode, 
nMaxInstances, 
noutBufferSize, 
nInBufferSize， 
nDefaultTimeOut, 


LPSECURITY ATTRIBUTES lpSecurityAttributes 


) 


如 果 该 函数 调用 成 功 ， 则 返回 创建 的 命名 管道 句柄 。 和 否则 ， 该 函数 返回 INVALID 
HANDLE _ VALUE。 各 参数 及 其 意义 如 下 : 
口 参数 jpName 表示 创建 的 命名 管道 名 称 。 该 名 称 格式 为 “\\pipe\pipename ”。 但 是 ， 


用 户 在 实际 编程 时 ， 应 该 将 该 名 称 修改 为 “\\\Wpipe\pipename”。 如 果 用 户 希 望 
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在 不 同 计算 机 的 两 个 进程 之 间 进 行 通信 ， 则 需要 将 名 称 字符 串 中 的 符号 “.” 修 改 
为 远程 计算 机 的 名 称 即 可 。 
口 参数 dwOpenMode 表示 名 管道 的 打开 模式 ， 包 括 访问 模式 、 管 道 句柄 的 安全 访问 


模式 以 及 重 全 方式 等 。 


模式 取 值 


PIPE ACCESS_DUPLEX 


该 参数 取 值 ， 如 表 3.3 所 示 。 


表 3.3 ”命名 管道 打开 模式 取 值 

意 义 
指定 双向 模式 , 即 服务 器 与 客户 端 都 可 以 从 命名 管道 中 读 取 或 写 入 
数据 


PIPE ACCESS_INBOUND 


PIPE ACCESS_OUTBOUND 


命名 管道 的 数据 只 能 从 客户 端 到 服务 器 , 即 用 户 指定 该 模式 表示 服 
务 器 只 能 读 取 数 据 而 客户 端 只 能 写 入 数据 
命名 管道 的 数据 只 能 从 服务 器 到 客户 端 , 即 用 户 指定 该 模式 表示 服 
务 器 只 能 写 入 数据 而 客户 端 只 能 读 取 数 据 


FILE FLAG WRITE THROUGH 


FILE FLAG OVERLAPPED 


WRITE DAC 
WRITE OWNER 
ACCESS_ SYSTEM _ SECURITY 


口 参数 dwPipeMode 表示 句柄 管道 的 类 型 、 读 取 以 及 等 待 方式 。 该 参数 的 具体 取 值 ， 


如 表 3.4 所 示 。 


人 允许 写 直通 模式 。 当 用 户 指定 该 值 时 ， 写 入 数据 的 一 方 要 等 到 写 入 
的 数据 到 达 另 一 方 的 数据 缓冲 区 之 后 ， 才 会 成 功 返回 
允许 使 用 重合 模式 。 采用 该 模式 可 以 使 一 些 耗费 时 间 的 操作 在 后 台 
执行 , 在 重合 模式 下 ,一 个 线程 可 以 在 多 个 管道 实例 上 同时 处 理 输 
入 与 输出 操作 

调用 线程 对 命名 管道 的 任意 访问 控制 列表 都 可 以 进行 写 入 操作 
调用 者 对 命名 管道 的 所 有 者 可 以 进行 写 入 操作 

调用 者 对 命名 管道 的 安全 访问 控制 列表 可 以 进行 写 入 操作 


表 3.4 管道 句柄 、 读 取 以 及 等 待 方式 


取 值 
PIPE TYPE BYTE 
PIPE TYPE MESSAGE 
PIPE READMODE BYTE 


PIPE READMODE MESSAGE 


PIPE WAIT 
PIPE NOWAIT 


意 义 
数据 以 字 节 流 的 形式 写 入 管道 
数据 以 消息 流 的 形式 写 入 管道 
以 字 节 流 的 形式 从 管道 中 读 取 数据 
以 消息 流 的 形式 从 管道 中 读 取 数据 
允许 阻塞 模式 
允许 非 阻塞 方式 


口 参数 nMaxInstances 表示 管道 能 够 创建 实例 的 最 大 数目 。 其 取 值 范围 在 1 一 PIPE_ 
UNLIMITED_INSTANCES。 如 果 将 该 值 设 为 PPPE_UNLIMITED_INSTANCES， 
则 创建 的 管道 实例 数目 仅 限于 操作 系统 。 


名 注意: 一 个 客户 端 只 能 与 一 个 管道 实例 进行 通信 。 


口 参数 nOutBufferSize 表示 输出 缓冲 区 的 大 小 。 
参数 nInBufferSize 表示 输入 缓冲 区 的 大 小 。 
参数 nDefaultTimeOut 表示 超时 值 , 使 用 同一 管道 的 不 同 实例 必须 将 该 参数 取 同 样 


口 
口 


口 
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的 超时 值 。 


参数 jpSecurityAttributes 是 指向 结构 体 SECURITY_ATTRIBUTES 的 指针 , 表示 命 
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名 管道 的 安全 属性 。 
例如 ， 用 户 使 用 该 函数 创建 一 个 命名 管道 。 代 码 如 下 : 


要 // 省 略 部 分 代码 
HANDLE hpip; 


hpip=CreateNamedPipe("\\\\.\\pipe\\pipename", PIPE ACCESS DUPLEX, 
PIPE TYPE BYTE, PIPE UNLIMITED INSTANCES,1024,1024,0, 


NULL); 
// 创 建 命名 管道 
// 省 略 部 分 代码 


2. 连接 命名 管道 


当 用 户 成 功 创建 命名 管道 以 后 ， 便 可 以 调用 相关 函数 连接 该 命名 管道 。 但 是 ， 服 务 器 
与 客户 端 连接 命名 管道 的 方法 并 不 一 样 。 

对 于 服务 器 而 言 ， 可 以 调用 函数 ConnectNamedPipe0 等 待 客户 端的 连接 请 求 。 该 函数 
原型 如 下 : 

BOOL ConnectNamedPipe( 

HANDLE hNamedPipe, 

， VPS DASE lpOverlapped 

该 函数 只 能 对 命名 管道 的 服务 器 方 进行 调用 ， 其 作用 是 等 待 客 户 端的 连接 请 求 。 其 参 
数 hNamedPipe 表示 命名 管道 的 句柄 。 参 数 jpOverlapped 是 指向 结构 体 OVERLAPPED 的 
指针 ， 如 果 创 建 的 管道 是 使 用 FILE_ FLAG _ OVERLAPPED 标记 打开 ， 那 么 该 参数 指向 的 
结构 体 中 必须 包含 一 个 人 工 重 置 的 事件 对 象 。 例 如 ， 用 户 在 服务 器 端 使 用 该 函数 等 待 客户 
端的 连接 请 求 ， 代 码 如 下 : 


a // 省 略 部 分 代码 
OVERLRPPED ovi={0}; // 定 义 结构 体 变量 
if(::ConnectNamedPipe (hpip, &ovi)) / /等待 客户 端的 连接 请 求 
{ 

MessageBox ("客户 端 连 接 成 功 ! ") ; // 提 示 信 息 
} 
Se // 省 略 部 分 代码 


对 于 通信 的 客户 端 而 言 ， 需 要 在 连接 服务 器 创建 的 命名 管道 之 前 判断 该 命名 管道 是 否 
可 用 。 用 户 在 程序 中 实现 这 个 功能 可 以 调用 函数 WaitNamedPipe0。 该 函数 原型 如 下 : 
BOOL WaitNamedPipe( 
LPCTSTR lpNamedPipeName, 
DWORD nTimeOut 

We 

该 函数 的 作用 是 判断 服务 器 创建 的 命名 管道 是 否 可 用 。 其 参数 及 意义 如 下 : 

口 参数 lpNamedPipeName 表示 命名 管道 的 名 称 。 该 名 称 的 格式 也 是 “WW\\\\pipe\pipen- 
ame”。 如 果 用 户 希 望 在 不 同 计算 机 的 两 个 进程 之 间 进 行 通信 ， 则 需要 将 名 称 字符 
串 中 的 符号 “.” 修 改 为 远程 计算 机 的 名 称 。 

口 参数 nTimeOnut 表示 超时 的 时 间 间 隔 。 其 取 值 如 表 3.5 所 示 。 
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表 3.5 参数 取 值 


取 值 意 义 
NMPWAIT USE DEFAULT WAIT | 表示 超时 时 间 是 服务 器 创建 命名 管道 时 所 指定 的 超时 时 间 
NMPWAIT WAIT FOREVER 表示 该 函数 将 一 直 等 待 ， 直 到 出 现 可 用 的 命名 管道 


如 果 该 函数 调用 成 功 , 将 返回 true。 否则 ， 函 数 将 返回 false。 当 函数 WaitNamedPipe() 
调用 成 功 后 , 用 户 需要 使 用 函数 CreateFile0 将 该 命名 管道 打开 以 获得 该 管道 的 句柄 。 例如 ， 
户 在 客户 端 获取 服务 器 创建 的 命名 管道 句柄 。 代 码 如 下 : 


区 本 /7 省略 部 分 代码 
HANDLE hpip; 


if (WaitNamedPipe("\\\\.\\pipe\\pipename", NMPWAIT WAIT FOREVER)) 
// 连 接 命名 管道 
hpip=CreateFile("\\\\.\\pipe\\pipename", GENERIC READ| GENERIC WRITE,0, 
NULL, OPEN EXISTING, FILE ATTRIBUTE NORMAL,NULL); 


// 打 开 指定 命名 管道 
时 


else 

上 
MessageBox ("连接 命名 管道 失败 ") ; // 提 示 信 息 
} 


在 本 小 节 中 ， 分 别 向 用 户 介绍 了 服务 器 与 客户 端 连接 命名 管道 的 方法 。 
3. 读 写 命名 管道 
不 论 服务 器 还 是 客户 端 ， 只 要 双方 的 命名 管道 连接 成 功 ， 用 户 便 可 以 调用 函数 Read 


File0 和 WriteFileO 对 命名 管道 进行 读 写 操作 。 例 如 ， 用 户 通过 命名 管道 读 取 数 据 。 代 码 
如 下 : 


本 // 省 略 部 分 代码 
char buf[200]; // 定 义 数据 缓冲 区 
DWORD readbuf; // 获 取 实 际 读 取 字 节 数 
if (ReadFile (hpip, buf, 200, greadbuf, NULL)) // 读 取 管道 数据 
{ 

MessageBox ("数据 读 取 成 功 ") ; // 提 示 信 息 

} 
else 
{ 

MessageBox ("数据 读 取 失 败 ") ; 

} 

// 省 略 部 分 代码 


以 上 代码 的 作用 是 服务 器 或 客户 端 通过 函数 ReadFile0 读 取 命 名 管道 中 的 数据 。 如 果 
读 取 数 据 成 功 ， 则 提示 用 户 数据 读 取 成 功 。 

如 果 用 户 需要 写 入 数据 到 命名 管道 中 ， 可 以 调用 函数 WriteFileO 进 行 数据 写 入 。 代 码 
如 下 : 


有 // 省 略 部 分 代码 
char buf[]=" 测 试 程序 "; // 定 义 数据 缓冲 区 
DWORD readbuf; // 获 取 实际 读 取 字 节 数 


if (WriteFile (hpip,buf,sizeof(buf),&readbuf,NULL) ) // 写 入 数据 到 管道 


。62 。 


第 3 章 多 线程 与 异步 套 接 字 编 程 


MessageBox ("数据 写 入 成 功 "); // 提 示 信 息 
} 


else 
: MessageBox ("数据 写 入 失败 ") ; 
: // 省 略 部 分 代码 
用 户 使 用 完 命名 管道 之 后 ， 必 须 调用 函数 CloseHandle0 将 命名 管道 的 句柄 删除 。 代 码 
如 下 : 


By // 省 略 部 分 代码 
CloseHandle (hpip) 7 // 关 闭 命名 管道 句柄 


通过 以 上 代码 ， 用 户 已 经 可 以 在 实例 程序 中 使 用 命名 管道 传输 数据 了 。 
4. 命名 管道 实例 
在 本 小 节 中 ， 将 通过 命名 管道 实例 程序 向 用 户 讲解 命名 管道 的 具体 使 用 方法 。 在 VC 


中 创建 基于 控制 台 的 工程 ， 并 将 工程 名 修改 为 “命名 管道 实例 ”。 然 后 添加 一 个 C++ 源 文 
件 ， 名 称 为 “服务 器 ”， 添 加 代码 如 下 : 


#include<windows .h> // 包 含 头 文件 
#include<stdio.h> 

main() 

L 
HANDLE hpip; // 定 义 命名 管道 句柄 
OVERLAPPED ovi={0}; // 定 义 结构 体 变量 

char buf{[200]; // 定 义 数据 缓冲 区 

DWORD readbuf; // 获 取 实际 读 取 字 节 数 


hpip=CreateNamedPipe("\\\\.\\pipe\\pipename", PIPE ACCESS DUPLEX, 
PIPE TYPE BYTE, PIPE UNLIMITED INSTANCES,1024,1024,0, 


NULL); // 创 建 命名 管道 
printf ("创建 管道 成 功 ， 正 在 等 待 客户 端 连接 ! \r\n"); 
if(::ConnectNamedPipe (hpip, &ovi)) / /等待 客 户 端的 连接 请 求 
| 
printf ("客户 端 连接 成 功 ! \r\n"); 
printf ("正在 读 取 数 据 ! \r\n"); // 提 示 信 息 
if (ReadFile (hpip, buf, 200, greadbuf, NULL)) // 读 取 管 道 数据 
| 
printf ("数据 读 取 成 功 \r\n"); // 提 示 信 息 


printf (" 读 取 的 数据 是 : %s\r\n",buf); 
} 


elise 

| 
printf ("数据 读 取 失败 \r\n"); 
} 


a 

将 上 面 的 代码 编译 之 后 , 会 生成 命名 管道 服务 器 。 然后 在 工程 中 添加 一 个 C++ 源 文件 ， 
名 称 修改 为 “客户 端 ”， 添 加 代码 如 下 : 

#include<windows .h> // 包 含 头 文件 


#include<stdio.h> 
main() 
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{ 

HANDLE hpip; 

OVERLAPPED ovi={0}; 

char buf[]=" 命 名 管道 测试 程序 "; // 定 义 数 据 缓冲 区 

DWORD readbuf; // 定 义 结构 体 变量 
printf ("正在 连接 命名 管道 ! \r\n"); 

if (WaitNamedPipe ("\\\\.\\pipe\\pipename", NMPWAIT WAIT FOREVER)) 

// 连 接 命 名 管道 


{ 
hpip=CreateFile("\\\\.\\pipe\\pipename", GENERIC READ| GENERIC WRITE,0, 
NULL, OPEN EXISTING, FILE ATTRIBUTE NORMAL,NULL); 


// 打 开 指 定 命名 管道 
if (hpip==INVALID HANDLE VALUE) // 打 开 命 名 管道 失败 
后 
printf ("打开 命名 管道 失败 \r\n"); 
elLse 
{ 
if (WriteFile (hpip, buf, sizeof (buf), greadbuf, NULL) ) // 写 入 数据 到 管道 
{ 
printf ("数据 写 入 成 功 \r\n"); // 提 示 信 息 
} 
else 
{ 
printf ("数据 写 入 失败 \r\n"); 
} 
} 
} 
else 
| 
printf ("连接 命名 管道 失败 \r\n"); // 提 示 信 息 
} // 创 建 命名 管 


} 


用 户 将 客户 端 代码 编译 之 后 ， 将 前 面 已 经 编译 
好 的 服务 器 程序 打开 。 用 户 可 以 看 到 服务 器 与 客户 
端 ee 命 名 管 管道 传输 数据 ， 如 图 3.12 所 示 。 

， 用 户 可 以 非常 熟练 地 使 用 命 
名 管道 在 两 个 进程 之 间 进 行 数据 传输 。 用户 还 可 以 eR 0 
将 书 中 的 实例 程序 与 随 书 光盘 中 的 实例 程序 进行 对 
比 学 习 ， 会 使 学 习 效果 更 好 。 


3.3.3 匿名 管道 


图 3.12 程序 通过 命名 管道 传输 数据 
匿名 管道 是 没有 命名 的 管道 ， 只 能 被 用 在 父 进程 与 子 进程 之 间 进行 数据 通信 。 与 命名 

管道 相 比 ， 匿 名 管道 不 能 被 使 用 在 网 络 进程 之 间 。 在 本 节 中 ， 将 向 用 户 讲解 使 用 匿名 管道 

进行 数据 传输 的 方法 。 

全 注意 : 子 进 程 是 指 由 父 进程 调用 函数 CreateProcess() 所 创建 的 进程。 
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1. 创建 匿名 管道 
在 程序 中 ， 用 户 可 以 调用 函数 CreatePipe0 创 建 匿名 管道 。 该 函数 原型 如 下 : 


BOOL CreatePipe( 
PHANDLE hReadPipe, 
PHANDLE hWritePipe, 
LPSECURITY ATTRIBUTES lpPipeAttributes, 
DWORD nsize 
); 
如 果 该 函数 调用 成 功 ， 则 返回 tue,， 并 将 匿名 管道 的 句柄 放 入 用 户 指定 的 句柄 变量 中 。 
和 否则， 函数 将 返回 false。 其 参数 及 意义 如 下 : 
口 参数 hReadPipe 表示 匿名 管道 的 读 取 句 柄 。 
口 参数 hWritePipe 表示 匿名 管道 的 写 入 句柄 。 


各 注意 : 以 上 两 个 参数 均 是 该 函数 需要 返回 的 读 写 句 柄 。 在 子 进 程 中 ， 也 就 是 使 用 这 两 个 
句柄 通过 匿名 管道 与 父 进程 进行 通信 。 


口 参数 jpPipeAttributes 是 指向 结构 体 SECURITY _ ATTRIBUTES 的 指针 ， 表 示 匿 名 
管道 的 安全 属性 。 由 于 在 匿名 管道 中 ， 子 进程 需要 继承 父 进程 的 读 写 句柄 ， 所 以 
不 能 设置 该 参数 为 NULL。 因 此 用 户 在 实际 编程 时 ， 应 该 初始 化 结构 体 
SECURITY_ATTRIBUTES 中 的 成 员 。 该 结构 定义 如 下 : 

typedef struct _SECURITY RATTRIBUTES { 


DWORD nLength; // 指 定 该 结构 体 的 大 小 

LPVOID lpSecurityDescriptor; // 安 全 描述 符 。 一 般 情况 下 ， 用 户 将 该 成 员 设 置 
为 NULL 

BOOL bInheritHandle; // 表 示 该 进程 所 返回 的 句柄 是 否 能 被 一 个 新 进程 所 
继承 


} SECURITY ATTRIBUTES; 
在 该 结构 中 ， 最 重要 的 成 员 是 第 三 个 。 其 决定 了 匿名 管道 的 读 写 句柄 是 否 能 被 子 进程 
所 继承 ， 所 以 用 户 必须 将 该 成 员 设 置 为 true。 
口 参数 nSize 表示 匿名 管道 缓冲 区 的 大 小 。 若 该 参数 为 0， 则 表示 系统 将 使 用 默认 的 


缓冲 区 大 小 。 
例如 ， 用 户 使 用 函数 CreatePipeO 创 建 一 个 匿名 管道 。 代 码 如 下 : 
// 省 略 部 分 代码 
SECURITY ATTRIBUTES ss; // 定 义 结构 体 SECURITY_ATTRIBUTES 变量 
ss. nLength=sizeof (ss); // 填 充 结构 体 中 的 各 成 员 


ss. lpSecurityDescriptor=NULL; 

ss. bInheritHandle=TRUE; 

HANDLE read,write; // 定 义 读 写 句柄 
if (CreatePipe (&read, &write, &ss,0)) // 创 建 匿名 管道 


MessageBox (" 创 建 匿名 管道 成 功 ") ; 
} 


在 代码 中 ， 用 户 需 要 特别 注意 在 填充 结构 体 SECURITY_ATTRIBUTES 的 成 员 时 ， 必 
须 将 成 员 bInheritHandle 设置 为 tue。 否 则 ， 子 进程 将 无 法 继承 父 进程 的 读 写 句 柄 。 
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2. 创建 子 进程 
当 用 户 创建 匿名 管道 成 功 后 ， 便 可 以 调用 函数 CreateProcess0 创 建 子 进程 。 该 函数 原 


型 如 下 : 


BOOL CreateProcess ( 
LPCTSTR lpApplicationName, 
LPTSTR lpCommandLine, 
LPSECURITY ATTRIBUTES lpProcessAttributes, 
LPSECURITY ATTRIBUTES lpThreadAttributes, 
BOOL bInheritHandles, 
DWORD dwCreationFlags, 
LPVOID lpEnvironment, 
LPCTSTR lpCurrentDirectory, 
LPSTARTUPINFO lpStartupInfo, 
LPPROCESS INFORMATION lpProcessInformation 


); 


该 函数 如 果 调 用 成 功 ， 则 返回 true。 否 则 ， 函 数 将 返回 false。 其 参数 及 意义 如 下 : 


口 


参数 lpApplicationName 表示 启动 进程 的 完整 路 径 。 如 果 用 户 没 有 为 该 参数 指定 完 
整 路 径 ， 则 函数 将 在 当前 目录 下 搜索 启动 进程 的 可 执行 文件 。 


外 注意 : 当 用 户 使 用 该 参数 时 ， 必 须 加 上 可 执行 文件 的 扩展 名 。 否 则 ， 函 数 将 不 会 主动 为 


口 


其 添加 扩展 名 。 


参数 pCommandLine 表示 传递 给 新 进程 的 命令 行 参数 。 用 户 在 编程 时 ， 可 以 在 该 
参数 中 指定 启动 进程 的 路 径 。 如 果 用 户 所 指定 的 进程 路 径 不 是 一 个 完整 的 路 径 ， 
则 函数 将 在 系统 的 搜索 路 径 下 进行 搜索 并 将 自动 为 该 启动 进程 的 文件 添加 扩展 名 
"bs 

参数 lpProcessAttributes 和 lpThreadAttributes 分 别 表示 启动 进程 的 进程 对 象 以 及 该 
进程 主线 程 的 安全 属性 。 若 用 户 使 用 默认 的 安全 属性 ， 则 将 这 两 个 参数 分 别 设置 
为 NULL。 

参数 bInheritHandles 表示 启动 进程 是 否 能 够 继承 父 进 程 的 相关 句柄 。 当 用 户 使 用 
匿名 管道 编程 时 ， 必 须 将 该 参数 设置 为 true。 

参数 dwCreationFlags 表示 启动 进程 创建 时 的 附加 标记 。 由 于 在 本 章 中 用 户 仅仅 是 
调用 该 函数 启动 一 个 进程 ， 所 以 用 户 将 该 参数 设置 为 0 即 可 。 

参数 lpEnvironment 表示 启动 进程 所 运行 的 内 存 环境 。 如 果 该 参数 为 NULL， 则 表 
示 启 动 进程 将 使 用 调用 进程 〈 父 进程 ) 的 内 存 环境 。 


名 注意 : 在 实例 程序 中 ， 用 户 将 该 参数 直接 设置 为 NULL 即 可 。 


口 


口 


参数 lpCurrentDirectory 指定 启动 进程 运行 后 的 路 径 , 该 路 径 必 须 是 完整 的 路 径 名 。 
如 果 该 参数 为 NULL， 则 表示 子 进程 与 父 进程 共用 相同 的 路 径 。 

参数 lpStartupInfo 是 指向 结构 体 STARTUPINFO 的 指针 ， 表 示 启 动 进程 将 如 何 显 
示 。 该 结构 如 下 : 


typedef struct STARTUPINFO { 
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DWORD cb; // 该 结构 体 的 大 小 
a // 省 略 部 分 成 员 
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DWORD dwFlags; // 指 定 该 结构 体 中 哪些 成 员 可 用 
HANDLE hstdInput; // 指 定 读 取 句柄 
HANDLE hstdoutput; // 指 定 写 入 句柄 
HANDLE hstdError; // 指 定 错误 句柄 


} STARTUPINFO, *LPSTARTUPINFO; 


由 于 该 结构 体 的 成 员 非 常 多 ， 所 以 在 这 里 只 向 用 户 讲解 在 匿名 管道 编程 中 需要 使 用 的 
几 个 成 员 。 其 中 ， 成 员 dwFlags 决定 了 该 结构 体 中 哪些 成 员 可 用 ， 如 果 将 其 指定 为 
STARTF USESHOWWINDOW, 则 表示 结构 体 中 的 成 员 hStdInput、 hStdOutput 和 hStdError 
可 用 。 用 户 也 可 以 通过 调用 函数 GetStdHandle0 获 得 系统 中 标准 输入 、 输 出 和 错误 句柄 。 
函数 GetStdHandleO 的 原型 如 下 : 


HANDLE GetStdHandle( 
DWORD nstdHandle 
); 


其 中 ， 参 数 nStdHandle 表示 用 户 需 要 获得 的 句柄 类 型 ， 其 值 如 表 3.6 所 示 。 


表 3.6 获取 的 句柄 类 型 


意 义 

STD INPUT HANDLE 系统 标准 输入 句柄 

STD _ OUTPUT HANDLE 系统 标准 输出 句柄 

STD ERROR HANDLE 系统 标准 错误 句柄 
例如 ， 用 户 在 程序 中 填充 结构 体 STARTUPINFO 中 的 各 个 成 员 。 代 码 如 下 : 
es // 省 略 部 分 代码 
STARTUPINFO sa={0}; // 定 义 并 初始 化 结构 体 
sa.cb=sizeof (sa); // 填 充 结构 体 中 的 各 个 成 员 


sa.dwFlags=STARTF USESHOWWINDOW; 

sa. hstdInput=read; 

sa. hstdoutput=write; 

sa. hstdError= GetStdHandle (STD ERROR HANDLE); 

口 参数 jpProcessInformation 是 指向 结构 体 PROCESS_INFORMATION 的 指针 。 该 参 

数 主要 用 于 接收 新 进程 的 相关 信息 。 

例如 ， 用 户 在 程序 中 使 用 函数 CreateProcessO) 创 建 一 个 可 继承 读 写 句柄 的 子 进程 。 代 

码 如 下 : 


PROCESS INFORMATION pp={0}; // 定 义 并 初始 化 结构 

5 // 省 略 部 分 代码 

CreateProcess (NULL, " 子 进程 .exe", NULL, NULL, TRUE, 0, NULL, NULL, &sa, &pp); 
// 创 建 子 进程 


首先 ， 用 户 定义 并 初始 化 结构 体 PROCESS_INFORMATION 变量 。 然 后 调用 函数 
CreateProcess0 〇 创建 子 进程 ， 并 将 子 进程 的 相关 信息 保存 在 变量 pp 中 。 


外 注意 : 用 户 创建 子 进程 成 功 以 后 , 可 以 调用 函数 ReadFile0 和 WriteFile0 对 匿名 管道 进行 
数据 读 取 和 数据 写 入 。 
3 父 进程 实例 
在 本 小 节 中 ， 将 通过 实现 父 进程 实例 程序 向 用 户 讲解 匿名 管道 通信 中 父 进程 端的 具体 
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实现 方法 。 首 先 ， 在 VC 中 创建 基于 控制 台 窗口 的 工程 ， 名 称 修改 为 “匿名 管道 ”。 然 后 
在 该 工程 中 ， 添 加 一 个 C++ 源 文件 ， 名 称 修改 为 “ 父 进程 ”。 然 后 在 源 文件 中 添加 代码 实 
现 其 功能 ， 代 码 如 下 : 


# 
# 


include<windows.h> 
include<stdio.h> 


main() 


L 


Ss 
Ss 
Ss 
Et 


&] 


{ 


HANDLE read=NULL,write=NULL; 
SECURITY ATTRIBUTES ss; 
STRRTUPINEO sa={0}; 

PROCESS_ INFORMATION pp={0}; 

char text[]=" 匿 名 管道 程序 测试 ! "; 
DWORD writetext7 

s.nLength=sizeof (ss); 
s.lpSecurityDescriptor=NULL; 
s.bInheritHandle=TRUE; 
f(CreatePipe (gread, gwrite, &ss,0)) 


printf ("创建 匿名 管道 成 功 \r\n"); 
a.cb=sizeof (sa); 
a.dwFlags=STARTF USESHOWWINDOW; 
a. hstdIinput=read; 

a. hstdoutput=write; 


// 定 义 读 写 句柄 

// 定 义 结构 体 SECURITY RATTRIBUTES 变量 
// 定 义 结构 体 STARTUPINFO 变量 

// 定 义 结构 体 PROCESS_INFORMATION 变量 
// 定 义 并 初始 化 字符 数组 


// 填 充 结构 体 中 的 各 成 员 


// 创 建 匿名 管道 


// 定 义 并 初始 化 结构 体 
// 填 充 结构 体 中 的 各 个 成 员 


a. hstdError= GetStdHandle (STD ERROR HANDLE); 
f(::CreateProcess (NULL," 子 进程 .exe",NULL,NULL,TRUE,0,NULL,NULL,&sa, 


pp)) 


printf ("创建 子 进程 成 功 \r\n"); 


// 创 建 子 进程 


WriteFile (write, text, sizeof (text), gwritetext, NULL); 


printf ("通过 匿名 管道 写 入 数据 成 功 \r\n"); 


} 


Else 


i 


printf ("创建 子 进程 失败 \r\n"); 
4 


} 
i 


将 上 面 的 代码 编译 ， 生 成 父 进 程 实例 。 
4. 子 进程 实例 


现在 , 用 户 需 要 编程 实现 子 进程 程序 实例 。 首先, 在 工程 “匿名 管道 ”中 添加 一 个 C++ 
源 文件 ， 名 称 修改 为 “ 子 进程 ”。 然 后 在 该 源 文件 中 添加 代码 实现 其 功能 ， 代 码 如 下 : 


#include<windows.h> 
#include<stdio.h> 
main() 


{ 
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HANDLE read=NULL; 

char text[100]={0}; 

DWORD readtext; 

read=GetSstdHandle (STD INPUT HANDLE); 


// 将 数据 写 入 匿名 管道 


// 写 入 失败 


// 包 含 头 文件 
// 主 函数 


// 定 义 读 取 句 柄 
// 定 义 并 初始 化 字符 数组 


// 获 取 读 取 句 柄 
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if (ReadFile (read, text, 100, greadtext, NULL)) // 读 取 匿 名 管道 中 的 数据 
让 

printf ("从 匿名 管道 中 读 取 的 数据 是 : $s\r\n", text); // 输 出 数据 
Sleep(10000) 7 // 程 序 睡眠 10 秒 钟 
return 0; // 程 序 正常 返回 

上 


将 程序 编译 ， 执 行 子 进程 实例 。 然 后 ， 用 户 可 以 首先 打开 父 进 程 ， 程 序 打开 以 后 会 自 
动 创建 匿名 管道 和 子 进程 。 通 过 匿名 管道 通信 的 效果 ， 如 图 3.13 所 示 。 


“E:\ 梁 伟 ( 勿 副 )\12\ 书 中 实例 \ 书 中 实证 《最 后 你 改 的 1 X 秆 


图 3.13 ”使 用 匿名 管道 实现 进程 间 通信 


3.3.4 小 结 


本 节 主 要 向 用 户 讲解 了 实现 进程 间 通 信 的 几 种 常见 方法 。 其 中 ， 邮 槽 以 及 命名 管道 不 
但 可 以 使 用 在 本 地 进程 之 间 ， 还 可 以 使 用 在 网 络 进程 之 间 的 数据 通信 。 而 匿名 管道 只 能 使 
用 在 本 地 进程 之 间 的 数据 通信 。 通 过 本 节 的 学 习 ， 用 户 对 进程 问 通信 的 方式 以 及 实现 方法 
可 以 有 一 个 进一步 的 了 解 。 


3.4 设置 IO 模式 


在 本 章 知识 中 ， 主 要 向 用 户 讲解 网 络 套 接 字 的 异步 IO 模式 。 通 常情 况 下 ， 当 用 户 使 
用 网 络 套 接 字 进行 程序 编写 时 ， 为 了 提高 程序 的 运行 效率 ， 则 应 该 使 程序 在 有 相关 的 事件 
响应 时 才 实 现 其 功能 。 和 否则 ， 没 有 相关 事件 发 生 时 ， 则 应 用 程序 处 于 后 台 运 行 状态 。 这 样 ， 
可 以 使 用 户 计算 机 的 运行 效率 大 大 提高 。 本 节 将 着 重 向 用 户 讲解 如 何 设置 套 接 字 的 IO 
模式 。 


3.4.1 异步 1/O 模式 


在 套 接 字 编程 中 ， 异 步 IO 模式 是 指 当 网 络 中 有 相关 的 套 接 字 消息 到 来 时 ， 程 序 才 会 
调用 相关 的 响应 函数 对 该 消息 进行 处 理 。 否 则 ， 程 序 将 在 系统 后 台 继 续 等 待 相关 的 消息 到 
来 或 者 实现 其 他 操作 。 

例如 ， 一 个 异步 套 接 字 程 序 处 理 的 套 接 字 消 息 是 连接 和 接收 。 那 么 ， 当 该 程序 在 所 创 
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建 的 套 接 字 上 监测 到 有 连接 消息 时 ， 程 序 会 调用 连接 消息 的 响应 函数 对 该 消息 进行 相关 处 
理 ， 如 果 监 测 到 的 套 接 字 消息 是 接收 消息 ， 其 处 理 过 程 也 一 样 。 当 套 接 字 处 理 完 已 经 监测 
到 的 消息 以 后 ， 程 序 会 在 系统 后 台中 继续 监测 套 接 字 相关 消息 。 这 样 ， 不 仅 可 以 降低 程序 
对 系统 资源 的 使 用 频率 ， 还 能 提高 程序 的 执行 效率 。 

如 果 用 户 使 用 VC 编写 异步 套 接 字 程序 ， 可 以 调用 函数 WSAAsyncSelect0 将 套 接 字 设 
置 为 异步 模式 。 关 于 该 函数 的 具体 讲解 将 在 3.4.2 节 中 进行 。 


3.4.2 WSAAsyncSelect 方 法 


函数 WSAAsyncSelect0 的 作用 是 将 用 户 指 定 的 套 接 字 对 象 设置 为 异步 模式 。 该 函数 的 
原型 如 下 : 


int WSAAsyncSelect ( 
SOCKET 3s, 
HWND hwnd, 
unsigned int wMsg, 
long lEvent 
); 
参数 如 下 : 
口 参数 s 表示 需要 设置 为 异步 模式 的 套 接 字句 柄 。 
参数 hWnd 表示 接收 消息 响应 的 窗口 句柄 。 
参数 wMsg 表示 响应 消息 标识 。 
参数 IEvent 表示 发 生 在 该 套 接 字 上 的 事件 ， 其 取 值 如 表 3.7 所 示 。 


表 3.7 套 接 字 事 件 部 分 标识 及 其 意义 


OO O 


取 值 意 义 
FD READ 套 接 字 上 发 生 读 取 事件 
FD WRITE 套 接 字 上 发 生 写 入 事件 
FD ACCEPT 套 接 字 上 发 生 连 接 事件 
FD CLOSE 套 接 字 上 发 生 关闭 事件 


在 使 用 该 函数 设置 异步 套 接 字 之 前 ， 用 户 首先 需要 定义 一 个 自 定义 消息 并 为 其 关联 消 
息 响 应 函数 。 例如, 在 本 节 中 将 定义 消息 WM_SOCKET, 与 该 消息 关联 的 消息 响应 函数 为 
OnSocket0。 然 后 ， 用 户 在 程序 初始 化 函数 中 使 用 函数 WSAAsyncSelect0 将 套 接 字 设置 为 
异步 模式 。 代 码 如 下 : 

本 // 省 略 部 分 代码 

WSAAsyncSelect (s,this->m hWnd, WM SOCKET, FD ACCEPT| FD READ) 

// 设 置 异步 套 接 字 

在 上 面 的 代码 中 ， 用 户 设置 异步 套 接 字 的 同时 指定 了 套 接 字 消 息 需要 处 理 的 相关 事 
件 。 如 果 用 户 将 异步 套 接 字 设置 成 功 后 ， 需 要 实现 套 接 字 消 息 响 应 函数 OnSocket0。 代 码 
如 下 : 


void CMY2D1g: :Onsocktl (WPARAM wParam, LPARAM lParam) 


Switch (lParam) 
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case FD READ: // 处 理 套 接 字 接收 事件 
ee // 省 上 略 部 分 代码 

case FD ACCEPT: // 处 理 套 接 字 连 接 事件 
9 // 省 略 部 分 代码 


} 

} 

在 上 面 的 代码 中 , 用 户 根据 消息 参数 lParam 判断 具体 发 生 的 套 接 字 事件 , 然后 再 根据 
该 事件 进行 相应 的 处 理 。 由 于 在 本 节 中 ， 主 要 向 用 户 讲解 函数 WSAAsyncSelect() 的 相关 用 
法 ， 所 以 关于 套 接 字 消 息 响应 函数 的 具体 实现 将 在 后 面 的 章节 中 进行 具体 讲解 。 


3 结 


在 本 章 中 ， 主 要 介绍 了 多 线程 程序 的 工作 原理 以 及 多 线程 程序 的 设计 方法 。 并 且 通 过 
线程 同步 技术 向 用 户 讲解 互 斥 对 象 等 线程 同步 方法 的 具体 实现 。 在 进程 通信 中 ， 列 举 了 几 
种 比较 常见 的 通信 方式 。 例 如 ， 邮 槽 、 命 名 管道 等 。 同 时 ， 邮 模 与 命名 管道 不 但 能 在 本 地 
进程 之 间 进 行 数据 通信 ， 还 能 在 网 络 进 程 之 间 进 行 数据 通信 。 在 3.4 节 中 ， 还 向 用 户 讲 解 
了 异步 套 接 字 的 相关 函数 以 及 实现 方法 。 

通过 本 章 相关 内 容 的 学 习 , 用 户 应 该 掌握 在 Windows 编程 中 怎样 实现 多 线程 程序 、 线 
程 同步 、 进 程 间 通 信 等 程序 设计 方法 。 本 章 中 的 具体 代码 请 参考 随 书 光 盘 中 的 相关 内 容 。 
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第 4 章 FTP 浏览 


FTP 是 一 种 文本 传输 控制 协议 。 其 常常 被 用 来 在 不 同 的 计算 机 之 间 传 输 文 本 文件 。 用 
户 通过 FTP 浏 览 器 向 服务 器 发 送 各 种 命令 , 可 以 很 方便 地 查看 远程 计算 机 上 的 文件 等 信息 。 
用 户 既 可 以 把 文件 从 远程 计算 机 复制 到 本 地 计算 机 ， 还 可 以 从 本 地 计算 机 复制 到 远程 计算 
机 。 本 章 将 详细 讲解 以 上 功能 的 VC 实现 。 


4.1 FTP 工作 原理 


FTP 的 工作 原理 跟 TCP 一 样 ， 客 户 端 需要 先 与 服务 器 连接 ， 等 待 服务 器 的 应 答 ， 最 后 
再 建立 数据 通道 。 所 以 ，FTP 浏览 器 在 和 服务 器 建立 连接 时 也 需要 经 过 “三 次 握手 ”的 过 
程 。 这 表示 客户 端 与 服务 器 之 问 的 连接 是 可 靠 、 安 全 的 ， 这 也 为 数据 传输 提供 了 可 靠 的 保 
证 。FTP 的 工作 原理 如 图 4.1 所 示 。 

[站 | 连 搂 服务 器 
连接 成 功 返回 

发 送 初始 化 命令 

命令 响应 成 功 返回 

发 送 用 户 验证 信息 

返回 验证 结果 
验证 通过 ， 进 行 数据 操作 | 
响应 客户 端 操作 命令 
发 送 关 闭 连接 命令 


器 千 避 dL 


器 吕 戈 dLd 


响应 关闭 连接 命令 


图 4.1 FTP 工作 原理 图 


4.1.1 FTP 数据 结构 


进行 FTP 编程 之 前 , 用 户 首先 需要 知道 FTP 有 哪些 数据 结构 。 由 于 在 某 些 主机 上 保存 
的 文件 是 面向 字 节 的 ， 某 些 是 面向 记录 的 。 所 以 在 FTP 中 ， 除 了 有 不 同 的 数据 类 型 以 外 ， 
还 有 几 种 不 同 的 文件 结构 类 型 。 这 样 做 的 目的 是 为 了 在 不 同 的 主机 之 间 传 送 文件 时 能 够 相 
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互 识别 。 
口 二 进 制 结构 : 文件 中 没有 内 部 结构 ， 一 般 被 看 作 二 进 制 流 。 
口 文件 式 结构 : 由 许多 记录 组 成 的 文件 。 
口 页 面 结构 : 由 不 同 的 索引 页 组 成 文件 。 


全 注意 : 一 般 情况 下 ， 如 果 没有 使 用 FTP 命令 去 设置 文件 的 结构 ， 则 默认 的 结构 是 文件 式 
结构 。 


4.1.2 FTP 数据 传输 模式 


在 FTP 的 数据 传输 中 ， 传 输 模 式 将 决定 文件 数据 会 以 什么 方式 被 发 送出 去 。 一 般 情 况 
下 ， 网 络 传输 模式 有 3 种 : 将 数据 格式 化 后 传送 、 压 缩 后 传送 、 不 做 任何 处 理 进 行 传送 。 
当然 不 论 用 什么 模式 进行 传送 ， 在 数据 的 结尾 处 都 是 以 EOF 结束 。 在 FTP 中 定义 的 传输 
模式 有 以 下 几 种 。 


1. 二 进 制 模式 


二 进 制 模式 就 是 将 发 送 数 据 的 内 容 转 换 为 二 进 制 表示 后 再 进行 传送 。 这 种 传输 模式 下 
没有 数据 结构 类 型 的 限制 。 

在 二 进 制 结构 中 , 发 送 方 发 送 完 数据 后 , 会 在 关闭 连接 时 标记 EOF。 如 果 是 文件 结构 ， 
EOF 被 表示 为 双 字 节 。 其 中 第 一 个 字 节 为 0， 而 控制 信息 包含 在 后 一 个 字 节 内 。 

本 书 中 如 无 特别 说 明 ， 均 采用 该 模式 进行 传输 数据 。 


2. 文件 模式 


文件 模式 就 是 以 文件 结构 的 形式 进行 数据 传输 。 文 件 结构 是 指 用 一 些 特定 标记 来 描述 
文件 的 属性 以 及 内 容 。 一 般 情况 下 ， 文 件 结构 都 有 自己 的 信息 头 ， 其 中 包括 计数 信息 和 描 
述 信息 。 信 息 头 大 多 以 结构 体 的 形式 出 现 。 
口 计数 信息 : 计数 指明 了 文件 结构 中 的 字 节 总 数 。 
口 描述 信息 : 描述 信息 是 负责 对 文件 结构 中 的 一 些 数据 进行 描述 。 例 如 ， 其 中 的 数 
据 校 验 标记 是 为 了 在 不 同 主机 间 交 换 特 定 的 数据 时 ， 不 论 本 地 文件 是 否 发 生 错误 
都 进行 发 送 。 但 在 发 送 时 发 送 方 需要 给 出 校 验 码 ， 以 确定 数据 发 送 到 接收 方 时 的 
完整 性 、 准 确 性 。 
在 文件 结构 中 ， 既 可 以 用 记录 结构 ， 也 可 以 用 相对 应 的 数据 表示 。 文 件 的 信息 头 结构 
如 表 4.1 所 示 。 


表 4.1 文件 的 信息 头 结构 


文件 信息 头 计数 信息 大 小 文件 信息 头 描述 信息 大 小 
计数 信息 占 16 位 字 节 描述 信息 占 8 位 字 节 


描述 信息 是 由 字 节 中 的 位 特定 标记 值 来 说 明 。 列举 几 个 特定 标记 值 及 其 意义 , 如 表 4.2 
所 示 。 


TS 。 
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表 4.2 特定 标记 值 及 意义 


标 记 值 4 
64 表示 文件 的 结束 符 标 记 EOF 
32 表示 文件 中 有 可 疑 错误 
16 表示 具有 重 发 标记 的 文件 


由 表 4.2 可 知 ， 描 述 信息 中 可 能 存在 多 个 标记 值 ， 所 以 必须 将 需要 用 到 的 标记 都 进行 
设置 。 


3. 压缩 模式 


在 这 种 模式 下 ， 需 要 传送 的 信息 包括 一 般 数 据 、 压 缩 数据 和 控制 命令 。 
口 一 般 数 据 : 以 字 节 的 形式 进行 传送 。 

口 压缩 数据 : 包括 数据 副本 和 数据 过 滤器 。 

口 控制 命令 :用 两 个 转 义 字符 进行 传送 。 


外 注意 : 此 种 传输 模式 请 参考 其 他 相关 书籍 ， 本 书 不 再 进行 深入 讲解 。 
在 FTP 数据 传输 时 ， 发送 方 必须 把 数据 转换 为 文件 结构 指定 的 形式 再 传送 出 去 ,而 接 


收 方 则 相反 。 因 为 进行 这 样 的 转换 很 慢 ， 所 以 一 般 在 相同 的 系统 中 传送 文本 文件 时 都 采用 
二 进 制 流 表 示 比 较 合适 。 


4.1.3 与 服务 器 进行 连接 


FTP 客户 端 需要 与 服务 器 连接 成 功 后 ， 才 能 进行 文件 数据 的 传输 。 当 连接 时 ， 客 户 端 
需要 用 户 指定 端口 、 连 接 模式 等 操作 。 


1. 连接 所 使 用 的 端口 


在 连接 端口 的 使 用 上 ，FTP 与 HTTP 不 同 。 因 为 FTP 在 与 服务 器 连接 时 需要 用 到 两 个 
端口 : 其 中 一 个 端口 (FTP 的 默认 端口 是 21) 作为 控制 连接 端口 ， 它 主要 用 于 发 送 命 令 给 
服务 器 以 及 等 待 服务 器 的 响应 ; 另 一 个 端口 是 数据 传输 端口 , 端口 号 为 20 或 者 任意 有 效 端 
口号 ， 用 来 建立 数据 传送 通道 。 

2. 连接 模式 


FTP 客户 端 连接 服务 器 的 模式 有 两 种 : PORT 模式 和 PASYV 模式 。 

口 PORT 模式 : PORT 是 主动 模式 。 当 客户 端 选择 这 种 模式 与 服务 器 进行 连接 的 时 候 ， 
它 需 要 向 服务 器 提供 一 个 PP 地 址 和 一 个 端口 号 。 

口 PASV 模式 : PASV 是 被 动 模式 。 当 选择 这 种 模式 连接 时 ， 服 务 器 需要 提供 给 客户 
端 一 个 他 地址 和 一 个 端口 号 。 用 户 平时 从 网 上 一 个 指定 的 FTP 地 址 和 端口 下 载 文 
件 就 是 这 种 模式 的 一 种 实际 应 用 ， 相 反 则 为 PORT 模式 。 


外 注意 : 在 本 章 中 如 无 特别 说 明 ， 所 选用 的 连接 模式 均 是 主动 模式 。 
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4.1.4 登录 验证 


在 连接 FTP 服务 器 成 功 之 后 , 用 户 需要 发 送 相关 命令 或 者 是 数据 流 到 服务 器 进行 身份 
验证 或 其 他 操作 。 在 本 章 的 4.1.6 小 节 中 ， 给 出 了 一 些 常用 的 FTP 命令 。 


1. 登录 方式 

在 登录 FTP 时 ， 登 录 方 式 有 匿名 登录 、 代 理 登 录 或 者 是 通过 用 户 名 登录 等 。 各 种 登录 
方式 的 不 同 在 于 访问 文件 的 权限 〈 只 读 、 只 写 或 者 读 写 ) ， 这 也 是 FTP 的 一 个 重要 特点 。 
各 注意 : 在 本 章 中 涉及 到 的 登录 方式 主要 是 以 用 户 名 登录 为 主 。 


2. 验证 


客户 端 将 用 户 名 和 密码 以 命令 的 方式 发 送 到 服务 器 进行 验证 ,例如 ,用 户 名 为 "lymlrl”， 
密码 为 “123456” 的 用 户 在 进行 验证 时 ， 将 其 转换 成 命令 流 : “USER”+lymlrl+“PASS” 
+123456; 这 个 命令 将 作为 字符 串 被 发 送 到 服务 器 ， 这 个 工作 是 通过 CArchive 等 类 中 的 函 
数 实现 的 〈 具 体内 容 将 在 4.3 节 中 讲解 ) 。 

服务 器 在 验证 之 后 会 返回 结果 给 客户 端 。 如 果 返 回 值 的 第 一 个 数字 为 1、2 或 者 是 3， 
则 表示 返回 值 正确 ， 否 则 发 生 错误 。 然 后 提取 当前 位 置 的 下 一 条 命令 值 ， 如 果 为 EROR 表 
示 出 现 用 户 名 或 密码 错误 ; 为 SUSS 则 表示 验证 成 功 。 


4.1.5 ”关闭 数据 连接 


通常 情况 下 ， 服 务 器 只 负责 进行 数据 连接 ， 并 对 它 进行 初始 化 和 关闭 。 除 非 客 户 端 在 
命令 控制 中 主动 要 求 关 闭 连接 时 ， 服 务 器 才 会 关闭 连接 。 当 然 服务 器 也 会 在 以 下 情况 下 关 
闭 数据 连接 。 

当 服 务 器 发 送 数据 结束 时 ， 会 通过 EOF 终止 传送 ; 

客户 端 发 送 ABORT 命令 ; 

客户 端 改变 了 端口 号 ; 

控制 连接 通道 被 关闭 ; 

传输 过 程 中 发 生 严重 错误 。 

是 ， 在 一 般 情况 下 客户 端 与 服务 器 之 间 的 连接 都 是 在 数据 正常 处 理 完成 以 后 关 


OOOOO 


人 
闭 的 。 


西 


4.1.6 FTP 常用 命令 
在 实际 编程 中 , 有 些 复杂 的 操作 , 只 是 需要 客户 端 发 送 相关 的 指令 到 服务 器 执行 即 可 。 


所 以 ,对 于 用 户 来 说 掌握 常用 的 FTP 命令 是 非常 重要 的 。 下 面 列举 了 一 些 常用 的 FTP 命令 ， 
如 表 4.3 所 示 。 
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表 4.3 常用 FTP 命 令 及 意义 


FTP 命令 意 义 

LIST 发 送 当前 工作 目录 下 的 文件 名 列表 到 客户 端 

PWD 显示 服务 器 的 当前 工作 目录 名 

RETR 从 服务 器 下 载 一 个 文件 

STOR 上 传 文本 文件 到 服务 器 ， 如 果 文件 存在 会 被 覆盖 
*STOU 上 传 文本 文件 到 服务 器 ， 但 不 会 覆盖 已 经 存在 的 文件 
STRU 设置 文件 的 结构 

MODE 指定 数据 的 传输 模式 

ABORT 通知 服务 器 关闭 连接 


在 表 4.3 中 ， 已 经 列举 了 部 分 常用 的 FTP 命令 。 通 常情 况 下 ， 客 户 端 通过 CArchive 
类 的 成 员 函 数 WriteString0 可 以 将 这 些 命令 以 字符 串 的 形式 发 送 到 服务 器 执行 。 然 后 ， 客 
户 端 使 用 CArchive 类 的 成 员 函 数 ReadString0 来 获取 服务 器 返回 的 数据 。 关 于 这 两 个 函数 
的 一 些 用 法 将 在 下 一 节 实例 中 进行 讲解 。 


4.1.7 ”数据 校 验 与 重 发 控制 


FTP 是 属于 TCP/IP 簇 中 的 一 种 具体 应 用 ， 所 以 FTP 也 具有 数据 重 发 机 制 。 但 在 FTP 
中 ， 数 据 重 发 仅 用 于 文件 和 压缩 模式 。 一 般 情况 下 ， 重 发 机 制 都 要 求 发 送 者 在 发 送 数据 时 
加 入 特定 标记 来 描述 数据 的 重要 信息 。 并 且 该 标记 只 针对 发 送 者 有 意义 ， 其 内 容 大 多 是 用 
来 校 验 数据 的 完整 性 。 特 定 标记 可 以 表示 任何 可 以 标记 的 属性 或 其 他 信息 。 

如 果 接收 方 也 支持 重 发 机 制 ， 那 么 接收 方 系统 中 将 会 保存 这 一 特定 标记 。 当 系统 重新 
启动 或 者 其 他 原因 造成 系统 重启 ， 用 户 均 可 以 根据 原来 的 标记 继续 传送 数据 。 其 实 ， 用 户 
经 常用 到 的 断 点 续 传 就 是 很 好 的 一 个 例子 。 当 接收 方 收 到 一 段 数据 后 ， 记 下 标记 ， 如 果 传 
送 过 程 中 出 现 错误 ， 那 么 发 送 方 将 会 从 这 个 标记 点 重新 传送 数据 。 


4.2 登录 FTP 服务 器 


在 对 FTP 文件 进行 相关 处 理 之 前 ， 用 户 必须 在 成 功 连接 、 登 录 服 务 器 以 后 ， 才 可 以 执 
行 相关 的 操作 。 本 节 将 主要 讲述 FTP 的 连接 以 及 登录 验证 过 程 ， 选 择 的 连接 模式 是 PASV 
(被 动 ) 模式 ， 登 录 方 式 是 用 户 名 登录 。 


4.2.1 连接 FTP 服务 器 


因为 FTP 连接 是 基于 Windows 套 接 字 编程 的 ， 所 以 FTP 的 连接 过 程 和 Socket 连接 一 
样 。 也 就 是 客户 端 创建 连接 套 接 字 以 后 ， 调 用 函数 ConnectO 向 服务 器 发 送 连接 请 求 。 用 户 
需要 特别 注意 的 是 待 服务 器 同意 连接 并 返回 后 ， 客 户 端 必 须 先 发 送 一 个 空 字符 串 到 服务 器 
进行 初始 化 ， 这 样 才 能 进行 数据 的 交换 。 在 连接 FTP 服务 器 程序 的 开发 中 ,用户 需要 用 到 
MEFC 的 一 些 类 或 函数 ， 如 CSocket 类 。 
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1. 实例 化 CSocket 


CSocket 类 是 MFC 对 Windows 套 接 字 的 一 个 封装 类 。 一 般 ， 它 使 用 类 中 的 构造 函数 
来 实例 化 对 象 。 但 是 在 实际 编程 中 ， 构 造 函数 常 使 用 new 关键 字 来 调用 ， 构 造 一 个 没有 初 
始 化 的 套 接 字 对 象 。 例 如 ， 代 码 如 下 : 


CSocket m clientsocket=new CSocket; / /构造 一 个 套 接 字 对 象 m_clientsocket 
构造 该 对 象 后 ， 必 须 调用 成 员 函 数 Create0 创 建 完整 的 套 接 字 句柄 。 其 函数 原型 为 ; 
BOOL CSocket: :Create (UINT nsocketPort, 

int nSocketType=SOCK STREAM, LPCTSTR lpszSocketAddress=NULL); 

在 该 函数 中 ,参数 nSockPort 用 来 指定 与 套 接 字 相关 联 的 本 地 端口 号 , 默认 值 为 0， 本 
章 实例 中 均 设置 为 FTP 的 默认 端口 21。nSocketType 指定 套 接 字 类 型 ， 默 认为 
SOCK_STREAM 表示 创建 流 式 套 接 字 ，FTP 客户 端 均 采用 默认 类 型 。lpszSocketAddress 指 
定 创建 套 接 字 的 网 络 地 址 ， 默 认为 NULL， 客 户 端 一 般 设 置 为 NULL。 该 函数 调用 成 功 返 
回 非 0 值 ， 否 则 返回 0， 表示 出 错 。 

2. 实现 连接 功能 

用 户 创 建 套 接 字 对 象 以 后 ， 就 可 以 调用 函数 去 实现 真正 的 连接 了 。 在 CSocket 类 中 ， 
实现 连接 功能 的 函数 是 Connect0， 其 函数 原型 如 下 : 

BOOL Connect (LPCSTR lpszHostAddress, UINT nHostPort); 

参数 lpszHostAddress 指定 将 要 连接 的 服务 器 地 址 ; nHostPort 指定 将 要 连接 服务 器 上 
的 端口 号 。 注 意 ， 一 般 在 FTP 编程 中 都 将 此 参数 设置 为 21 号 端口 。 该 函数 连接 服务 器 成 
功 ， 则 返回 tue， 和 否则 返回 false。 例 如 ， 用 户 需要 连接 一 个 他 地 址 为 “218.6.132.5” 的 服 
务 器 ， 则 其 代码 如 下 : 


Csocket *m clientsocket=new CSocket (); // 构 造 连接 套 接 字 对 象 
m clientsocket->Create (21, SOCK_STREAM, FD READI|FD WRITE, NULL); 

// 创 建 流 式 套 接 字 
m clientsocket->Connect ("218.6.132.5", 21); // 连 接 服务 器 


这 段 代 码 的 作用 是 创建 套 接 字 对 象 以 后 ， 调 用 函数 ConnectO 进 行 连接 服务 器 的 操作 。 
3. 封装 连接 过 程 


本 节 中 ，FTP 的 连接 过 程 主要 由 自 定义 函数 FTPConnect0 实 现 。 函 数 FTPConnect0 的 
作用 是 根据 用 户 输入 的 服务 器 地 址 和 端口 号 ,连接 FTP 服务 器 。 其 返回 值 表示 操作 是 否 成 
功 。 其 具体 代码 如 下 : 

// 连 接 服务 器 函数 ， 参 数 severhost 表示 服务 器 IP 地 址 ，port 指定 要 连接 的 服务 器 端口 


BOOL ETPConnect (CString severhost, int port) 
| 


CSocket *m clientsocket=new CSocket(); / /构造 连接 套 接 字 对 
m clientsocket->Create (21, SOCK_ STREAM, FD READ|EFD WRITE, NULL) 
if(!m clientsocket) // 淹 断 套 接 字 对 象 创建 是 否 成 功 


。79 。 


第 2 篇 Visual C++ 网 络 编程 典型 应 用 
{ MessageBox (" 套 接 字 创 建 失败 ! ") 


return false; } // 创 建 m_clientsocket 失败 
if(!(m clientsocket->Connect (severhost, port))) return false; 
// 连 接 FTP 服务 器 
else 
{ return true;} // 连 接 成 功 将 返回 true 
} 


在 该 函数 中 , 参数 severhost 和 port 分 别 指定 要 连接 服务 器 的 地 址 和 端口 。 程序 首先 创 
建 流 式 套 接 字 m_clientsocket， 然 后 调用 CSocket 类 的 函数 Connect0 连 接 FTP 服务 器 。 当 
连接 失败 时 ， 函 数 返回 false; 否则 ， 返 回 true。 

自 定义 函数 FTPConnectO 封 装 完成 后 便 可 以 对 其 进行 调用 。 代 码 如 下 : 


Void OnCconnect () 


{ CString address="218.6.132.5"7 // 定 义 IP 地 址 字符 串 变量 并 初始 化 
int port=21; // 定 义 端口 变量 并 初始 化 

if(! (FTPCoNnnect ( (LPCSTR)address, port))) // 判 断 FTPConnect 调用 是 否 成 功 

{ MessageBox ("连接 失败 ! ") ;} // 提 示 失 败 

else 

{MessageBox ("连接 服务 器 成 功 ! ") ; } // 否 则 提示 成 功 

} 


函数 OnConnect0 根 据 定义 的 IP 地 址 和 端口 号 ， 调 用 自 定义 函数 FTPConnect0 连 接 服 
务 器 。 其 中 ，IP 地 址 和 端口 号 可 以 由 用 户 进行 自 定义 。 以 上 代码 实现 了 客户 端 连 接 服务 器 
的 基本 功能 。 


4.2.2 登录 FTP 服务 器 


对 于 客户 端 而 言 ， 连 接 服务 器 成 功 后 需要 发 送 用 户 名 等 验证 信息 到 服务 器 进行 验证 
登录 。 


1. 构造 验证 信息 


在 FTP 中 ,验证 信息 是 以 命令 字符 串 的 形式 发 送 到 服务 器 的 。 首 先 ， 验 证 信息 由 用 户 
名 和 密码 组 成 。 用 户 名 用 命令 USER 标识 ,密码 用 命令 PASS 标识 .例如 ,用 户 名 为 "lymlrl”， 
密码 为 “123456” 的 验证 信息 写成 命令 流 为 “USER”+lymlrlt “PASS”+123456。 

如 果 用 户 使 用 匿名 登录 方式 登录 FTP 服务 器 ， 则 用 户 名 使 用 默认 的 anonymous， 密 码 
可 以 是 自己 的 邮箱 。 那 么 命令 流 为 “USER”+anonymous+ “PASS”+xxxx@163.com。 


2. 发 送 验证 信息 


验证 信息 构造 完成 后 , 用户 可 以 使 用 MFC 类 库 中 的 CSocketFile 和 CAchive 两 个 类 进 
行 数据 发 送 。 一 般 情况 下 ，CSocketFile 类 是 和 CSocket 类 一 起 使 用 的 ， 它 主要 用 来 创建 一 
个 与 套 接 字 相 关联 的 文件 对 象 。 例 如 ， 创 建 一 个 与 4.2.1 节 中 套 接 字 对 象 m_clientsocket 相 
关联 的 CSocketFile 对 象 ， 代 码 如 下 : 


CsocketFile *m sockfile; // 定 义 文件 对 象 指针 
m sockfile=new CSocketFile(m clientsocket); 


// 关 联 对 象 ，m_clientsocket 是 创建 的 套 接 字 
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然后 ， 再 使 用 CAchive 类 创建 一 个 与 该 文件 指针 对 象 m_sockfile 关联 的 串 行 化 对 象 。 
代码 如 下 : 


CArchive *m archive; // 定 义 串 行 化 指针 对 象 


m archive=new CArchive (gm sockfile, CArchive::load| CArchive::store); 
/ /创建 对 象 m_archive 的 实例 并 指定 属性 
一 般 情况 下 ,用 户 在 创建 串 行 化 对 象 m_archive 时 ， 都 要 为 其 指定 属性 CArchive::load| 
CArchive::store， 表 示 创 建 的 对 象 m_archive 具有 读 取 和 存储 的 功能 。 
现在 ， 用 户 可 以 调用 CArchive 类 的 WriteString0 函 数 进行 命令 发 送 。 其 原型 如 下 : 
Void WriteString (LPCTSTR lpsz); 


参数 lpsz 指定 将 要 操作 的 字符 串 。 该 函数 调用 失败 会 抛 出 一 个 异常 。 例 如 ， 用 户 要 获 
取 服 务 器 上 的 文件 目录 需要 向 服务 器 发 送 LIST 命令 ， 使 用 该 函数 进行 发 送 。 代 码 如 下 : 
m archive->Writestring ("LIST"+"\r\n"); 
// 调 用 CArchive 类 的 WriteString 发 送 LIST 命令 


外 注意 : 有 关 FTP 的 其 他 命令 请 参考 表 4.3。 
使 用 用 户 名 和 密码 登录 FTP 服务 器 。 其 代码 如 下 : 


CString str=""USER"+lymlrl+"PASS"+123456"; // 定 义 命令 字符 串 变量 
try 


{ 
m archive->Writestring (str+"\r\n");// 调 用 CArchive 类 的 Writestring 发 送 命令 


m archive->Flush (); // 强 制 写 入 命令 到 服务 器 
} 


Catch (CException e) // 处 理 被 抛 出 的 异常 
{ 


MessageBox (" 发 送 关闭 命令 失败 ! ") 7 
// 省 略 部 分 代码 

在 代码 中 ， 所 使 用 的 登录 方式 是 用 户 名 密码 登录 。 如 果 用 户 选择 匿名 登录 ， 则 将 字符 
串 变 量 初始 化 为 “USER ”+anonymous+“PASS”+XXXX@163.com 即 可 。 然 后 使 用 函数 
WiriteString0 发 送 到 服务 器 ， 如 果 失 败 该 函数 则 抛 出 异常 进行 处 理 。 

用 户 在 实际 编程 中 ， 需 要 首先 发 送信 息 到 服务 器 进行 初始 化 ， 才 能 发 送 其 他 命令 到 服 
务 器 执行 。 具 体 代码 如 下 : 


CsocketFile *m sockfile; // 定 义 文件 对 象 指针 
CArchive *m archive; // 定 义 串 行 化 指针 对 象 m_archive 
m sockfile=new CSocketFile(m clientsocket); // 关 联 对 象 
m archive=new CArchive (gm sockfile, CArchive::load| CArchive::store); 
/ /创建 对 象 m_archive 的 实例 并 指定 属性 


Void send() // Senqd () 函数 发 送信 息 到 服务 器 
下 Cstring charstring; 


charstring=""USER"+lymlrl+"PASS"+123456"; / /构造 字符 串 charstring 


m archive->Writestring(" "+"\r\n");  // 向 服务 器 发 送 空 字符 串 进行 初始 化 
try{ 
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m archive->Writestring (charstring +"\r\n"); 
// 调 用 CArchive 类 的 Writestring 发 送 命令 
m archive->Flush (); // 强 制 写 入 命令 到 服务 器 
} 
Catch (CException e) // 处 理 被 抛 出 的 异常 


|! 
MessageBox ("发 送 关 闭 命令 失败 ! "); 
: 
} 


在 上 面 的 示例 代码 中 ， 程 序 首先 调用 函数 WriteString0) 发 送 一 个 空 字符 串 到 FTP 服务 
器 进行 初始 化 工作 。 然 后 发 送 已 经 构造 好 的 用 户 登录 信息 到 服务 器 进行 验证 。 


外 注意 : 在 发 送 字符 串 的 时 候 一 定 要 在 后 面 加 上 “rm”。 
3. 接收 验证 信息 


客户 端 接收 服务 器 返回 的 内 容 是 通过 CArchive 类 的 函数 ReadString0 进 行 的 。 这 个 函 
数 的 作用 是 从 与 CArchive 对 象 相关 联 的 套 接 字 文件 中 读 取 数 据 到 指定 变量 中 。 其 原型 
如 下 : 


BOOL ReadString( CString& rstring ); 


其 中 ， 参 数 rString 是 存放 接收 数据 的 。 该 函数 调用 成 功 返回 tue， 否 则 返回 false。 在 
本 章 中 封装 一 个 自 定义 函数 Recv0 来 接收 服务 器 返回 的 数据 。 其 功能 代码 如 下 : 


Cstring Recv() // Recv () 函数 接收 服务 器 返回 的 数据 
{ 

CString recvstr=" "7 // 初 始 化 字符 串 recvstr 为 空 

if(m archive->Readstring (recvstr)) // 接 收 返回 信息 并 放 到 recvstr 变量 
yd 


if(recvstr==" ") MessageBox ("接收 数据 为 空 ") ; // 如 果 接 收 的 数据 为 空 则 提示 
{ MessageBox ("接收 数据 成 功 "); 


return recvstr; }} // 返 回 接收 到 的 数据 
else 
{ 


MessageBox ("接收 数据 失败 ") ; // 提 示 接 收 数据 失败 
1 

函数 RecvO 的 作用 是 接收 服务 器 返回 的 数据 ， 并 将 数据 保存 在 字符 串 变量 recvstr 中 ， 
函数 的 返回 类 型 是 CString 类 型 。 在 程序 中 ， 首 先 判 断 接收 数据 是 否 成 功 ， 再 对 接收 到 的 
数据 进行 判断 是 否 为 空 。 如 果 不 为 空 ， 则 直接 返回 接收 到 的 数据 。 

用 户 接收 到 的 数据 内 容 ， 会 因为 FTP 服务 器 的 不 同 而 不 同 。 例 如 ， 有 的 服务 器 在 客户 
端 登录 成 功 以 后 返回 欢迎 信息 到 客户 端 等 。 

4. 分 析 数 据 

客户 端 在 接收 到 服务 器 返回 的 信息 以 后 ， 用 户 需 要 将 返回 的 信息 内 容 进 行 分 析 ， 以 得 
到 用 户 所 需要 的 数据 。 该 信息 是 一 个 字符 串 形式 。 它 由 3 个 数字 、 一 个 空格 和 一 段 文字 信 
息 组 成 。 其 形式 如 表 4.4 所 示 。 
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表 4.4 数据 基本 格式 
3 个 数字 文字 信息 字符 由 


第 一 个 数字 若 为 1 或 者 2， 则 表示 返回 值 正 确 。 若 为 3， 则 表示 一 个 中 间 层 的 肯定 回 
答 ， 此 时 ， 服 务 器 会 等 待 客 户 端 进一步 的 信息 。 若 为 其 他 ， 则 表示 错误 。 第 二 个 数字 表示 
回答 的 类 型 ， 若 为 0， 则 表示 语法 错误 。 若 为 1 则 表示 信息 内 容 。 第 三 个 数字 表示 对 错误 
进行 具体 的 分 类 。 

在 文字 信息 中 , 如 果 内 容 为 EROR 表示 出 现 用 户 名 或 密码 错误 。 和 否则 , 表示 验证 成 功 。 
下 面 将 使 用 自 定义 函数 Recv0 来 接收 数据 ， 然 后 再 对 接收 到 的 数据 进行 分 析 。 代 码 如 下 : 


CString strl=" "; / /初始 化 字符 串 变 量 ， 用 于 存放 服务 器 返回 的 信息 
char ch; // 定 义 字 符 变 量 ， 用 于 字符 比较 

int 4=0F // 循 环 变量 初始 化 为 0 

strl=RecV() 7 // 调 用 Recv () 函数 得 到 服务 器 返回 的 信息 
if(strl.GetLength() >0) // 比 较 strl 的 长 度 

4 

ch= strl.GetAt (i); // 将 接收 到 的 第 一 个 字符 赋 给 ch 

} 

if (ch==1&& ch==2) // 如 果 返 回 的 第 一 个 字符 等 于 1 或 者 2， 表 示 返 回 值 正确 
{ 


while(i<= strl.GetLength() &g&ch!=NULL) 
{ switch(ch) 


case EROR: // 出 现 错误 
MessageBox (" 用 户 名 或 密码 错误 ! ") ; 
break; 

case SUSS: // 验 证 成 功 


MessageBox ("登录 成 功 ! "); 
return true; 
break; 


ch= strl.GetAt (++i); // 循 环 查看 返回 的 信息 

} 

} 

在 代码 中 ， 用 户 通过 CString::GetAt(0) 函 数 可 以 获得 服务 器 返回 信息 的 第 一 个 字符 。 
如 果 第 一 个 字符 等 于 1 或 2， 则 表示 返回 值 正确 。 否 则 ， 表 示 发 生 错 误 。 最 后 ， 使 用 变量 i 
进行 循环 获得 命令 值 ， 如 果 是 EROR 表示 验证 错误 。 否 则 ， 表 示 成 功 。 

5。. 关闭 与 服务 器 的 连接 


当 用 户 操作 完 需 要 的 数据 以 后 ， 需 要 关闭 与 服务 器 的 连接 。 这 时 ， 向 服务 器 发 送 
ABORT 或 者 是 改变 端口 等 操作 都 会 使 服务 器 关闭 连接 。 在 这 里 最 为 简便 的 方法 是 使 用 
CArchive 类 的 WriteString0 发 送 ABORT 命令 到 服务 器 。 关 闭 连接 操作 的 关键 代码 如 下 : 

try{ // 尝 试 发 送 命 令 ABORT 到 服务 器 ， 以 关闭 连接 


m archive->Writestring ("ABORT "+"\r\n"™); 

// 调 用 CArchive 类 的 Writestring 发 送 命 令 
m archive->Flush (); // 强 制 写 入 命令 到 服务 器 
} 


Catch (CException e) 


{ 
MessageBox ("发 送 关 闭 命令 失败 ! "); 
} // 抛 出 错误 并 处 理 错误 
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在 这 一 小 节 中 ,用 户主 要 了 解 了 怎样 去 连接 、 登 录 FTP 服务 器 、 验 证 用 户 信息 和 关闭 
连接 等 过 程 实现 。 在 上 述 操作 都 成 功 以 后 ， 用 户 就 可 以 进行 相关 的 文件 处 理 操作 了 。 关 于 
FTP 具体 的 文件 处 理 将 在 下 节 中 进行 讲述 。 


4.3 FTP 文件 处 理 


在 FTP 客户 端 编程 中 , 用 户 可 以 通过 一 些 类 或 者 函数 ， 获 得 服务 器 的 文件 目录 和 实现 
上 传 、 下 载 文件 等 功能 。 例 如 ， 在 MFC 中 ，CSocketFile 类 和 CArchive 类 是 在 FTP 编程 中 
很 重要 的 两 个 类 。 本 节 将 重点 介绍 这 两 个 类 的 一 些 用 法 和 示例 。 


4.3.1 CSocketFile 类 的 使 用 


在 MFC 中 定义 了 一 个 在 套 接 字 编 程 中 使 用 的 类 : CSocketFile 类 ; 它 可 以 充分 发 挥 
CSocket 类 的 特性 。CSocketFile 类 是 CFile 的 派生 类 ， 它 主要 用 来 在 Windows Sockets 编程 
中 发 送 和 接收 序列 化 数据 〈 如 结构 体 数据 ) 。 通 过 把 CSocketFile 类 对 象 、CArchive 对 象 
和 CSocket 创建 的 套 接 字 对 象 联系 起 来 ， 可 以 实现 数据 的 加 载 〈 接 收 》 和 存储 〈 发 送 ) 。 


1. 构造 函数 


在 实际 编程 中 ， 将 CSocketFile 对 象 和 CSocket 对 象 直接 联系 起 来 可 以 用 CSocketFile 
类 的 构造 函数 来 完成 。CSocketFile 类 构造 函数 原型 如 下 : 

CSocketEile: :CSocketFile(CSocket*+ pSocket, BOOL bArchiveCompatible = 

TRUE ) 7 

参数 pSocket 是 一 个 CSocket 对 象 ; bArchiveCompatible 指示 该 文件 对 象 是 否 与 一 个 
CArchive 对 象 一 起 使 用 ， 默 认为 true。 该 构造 函数 可 以 有 两 种 调用 方式 。 例 如 : 


CSocket *m clientsocket=new CSocket; // 创 建 套 接 字 
CSocketFile *m sockfile=new CSocketFile(&m clientsocket); 


/ /创建 一 个 与 m_clientsocket 关联 的 文件 指针 对 象 


上 述 代 码 中 ， 是 通过 new 关键 字 调 用 CSocketFile 类 的 构造 函数 创建 一 个 指针 对 象 的 。 
第 二 种 调用 方式 如 下 : 

Csocket +*m clientsocket=new CSocket; // 创 建 套 接 字 

CSocketFile m sockfile(&m clientsocket); 


// 创 建 一 个 与 m_clientsocket 关联 的 文件 对 象 


这 两 种 调用 方式 都 需要 在 实例 化 对 象 m_sockfile 之 后 , 再 与 CArchive 对 象 相关 联 ， 并 
由 CArchive 对 象 指定 其 属性 。 属 性 取 值 如 表 4.3 所 示 。 代 码 如 下 : 
CArchive ar(&m sockfile, CArchive::load| CArchive::store); 
// 创 建 与 m_sockfile 相关 联 的 串 行 化 对 象 并 指定 属性 


// 省 略 部 分 代码 
ar.Close (); // 关 闭 串 行 化 对 象 
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很 注意 : 在 这 里 使 用 完 囊 行 化 对 象 ar 以 后 ， 需 要 使 用 函数 CArchive::Close0 关 闭 ， 确 保 数 
据 (命令 ) 及 时 存储 (发 送 ) 。 
2. CSocketFile 与 CFile 进 行 比 较 


CSocketFile 类 虽然 派生 于 CFile 类 ,但 是 它 却 屏蔽 掉 了 函数 CFile::Open0。 也 就 是 说 ， 
户 在 实际 编程 时 ， 不 能 使 用 CSocketFile 对 象 直接 去 调用 函数 Open0 打 开 文 件 。 


外 注意 : 由 于 在 本 章 实例 中 ， 有 关 文 件 的 操作 大 多 是 由 CArchive 类 进行 的 。 因 此 ， 关 于 
CSocketFile 类 的 其 他 函数 请 参看 MSDN， 这 里 不 再 进行 鞭 述 。 


4.3.2 ”使 用 CArchive 类 进行 串 行 化 


在 MFC 中 ，CArchive 对 象 可 以 将 数据 序列 化 (按照 顺序 ) 写 入 与 它 相 关联 的 文件 中 
去 。 它 提供 类 型 安全 的 缓冲 机 制 。 下 面 将 讲 一 下 CArchive 类 常用 的 函数 。 


1. 工作 原理 


CArchive 类 对 象 在 初始 化 时 ， 先 指定 一 个 缓冲 区 作为 临时 存储 ， 再 将 需要 保存 的 数据 
写 到 缓冲 区 中 。 当 缓冲 区 被 填 满 时 ， 才 将 缓冲 区 中 的 内 容 写 入 它 所 指向 的 CFile 文件 对 
象 中 。 

同样 ， 当 用 户 读 取 数 据 时 ， 串 行 化 对 象 将 数据 从 文件 读 取 到 指定 的 缓冲 区 ， 再 从 缓冲 
区 读 取 到 与 对 象 相关 联 的 文件 中 。 这 样 ， 使 用 缓冲 区 不 但 减少 了 对 物理 硬盘 的 操作 次 数 ， 
而 且 提高 程序 的 运行 速度 。 

2.， 串 行 化 对 象 


一 般 ，CArchive 类 使 用 构造 函数 创建 指定 的 串 行 化 对 象 ， 并 且 与 CSocketFile 对 象 相 
关联 。 原 型 如 下 : 

CArchive: :CArchive (CFile *pfile, UINT nMode, int nBufsize, Void *1PBuf= 

NULL); 

参数 pfile 指向 一 个 需要 进行 串 行 化 的 对 象 指针 。nMode 是 设置 创建 对 象 的 标志 。 如果 
用 户 设置 了 此 标志 ， 则 必须 在 对 象 销毁 前 调用 Close0 函 数 关 闭 文件 。 否 则 ， 文 件 中 的 数据 
将 会 被 损坏 。 该 参数 的 常用 标志 如 表 4.5 所 示 。 


表 4.5 nMode 的 常用 标志 
标志 所 示意 义 
从 文件 中 读 取 【 保 存 ) 数据 
是 为 了 防止 CArchive 对 象 在 被 销毁 时 候 自动 调用 Flush 进行 更 新 


常用 标志 
CArchive::load(store) 
CAIrchive::bNoFlushOnDelete 


参数 nBufsize 用 于 设置 的 缓冲 区 大 小 ; lpBuf 用 于 自 定义 缓冲 区 ， 默 认 情 况 下 为 
NULL。 例如: 


Csocket *m clientsocket=new CSocket; // 创 建 套 接 字 
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CSocketFile *m sockfile=new CSocketFile(gm clientsocket)7 


// 创 建 与 m_clientsocket 关联 的 对 象 


CArchive *m archive=new CRArchive (&m sockfile,CArchive::load| CArchive:: 

store, 100, NULL); 

在 代码 中 ， 为 创建 的 串 行 化 对 象 m_archive 设置 一 个 大 小 为 100 的 缓冲 区 。 最 后 一 个 
参数 设 为 NULL， 表 明 缓 冲 区 由 系统 决定 。 


3. 串 行 化 操作 
在 CArchive 类 中 ， 是 使 用 函数 ReadString0 和 WriteStringO 进 行 CSocketFile 文件 的 读 
写 操作 。 函 数 原 型 如 下 : 


UINT CArchive:: ReadString(CString str); 
void CArchive:: WriteString (CString strl) 7 
这 两 个 函数 均 包 含 一 个 字符 串 类 型 的 参数 。 但 是 ， 其 具体 含义 却 不 同 ， 分 别 如 下 : 
口 str 表示 将 读 取 后 保存 的 字符 串 数据 。 
口 strl 表示 将 写 入 的 字符 串 数据 。 
除了 上 面 的 方法 以 外 ， 还 可 以 使 用 串 行 化 操作 的 基本 方法 。 代 码 如 下 : 


Sar / /省略 部 分 代码 

m archive<<str; // 向 串 行 化 对 象 m_archive 写 入 字符 串 str 
m archive>>strl; // 从 串 行 化 对 象 m_archive 读 出 数据 到 strl 
m archive->Close(); // 关 闭 串 行 化 对 象 m_archive 


在 这 里 用 户 需 要 注意 , 在 关闭 串 行 化 对 象 后 , 与 其 相关 联 的 文件 对 象 也 会 随 之 被 关闭 。 
函数 CArchive::Close0 用 于 清除 CArchive 类 创建 时 所 指定 的 缓冲 区 , 再 关闭 CArchive 对 象 ， 
并 且 将 CArchive 对 象 和 与 之 相关 联 的 CSocketFile 对 象 进行 分 离 。 

如 果 用 户 需要 马上 将 数据 写 入 到 串 行 化 对 象 中 ， 需 要 用 到 Flush 函数 。 它 主要 用 于 将 
缓冲 区 中 剩余 的 数据 强制 地 写 入 CArchive 对 象 所 关联 的 文件 中 。 代 码 如 下 : 

Ge // 省 略 部 分 代码 

m archive->Writestring (str+"\r\n");// 调 用 CArchive 类 的 WriteString 发 送 命令 

// 在 这 里 也 可 以 使 用 m_archive<<str<<"\r\n"; 

m archive->Flush(); // 强 制 将 数据 str 写 入 到 串 行 化 对 象 中 

m archive->Close(); // 关 闭 串 行 化 对 象 

在 程序 中 ， 如 果 没 有 调用 函数 FlushO0， 那 么 真正 将 数据 写 入 到 物理 磁盘 是 在 调用 函数 
Close0 关 闭 串 行 化 对 象 以 后 。 因 此 ， 一 些 重要 的 数据 需要 使 用 FlushO 函 数 立即 写 入 文件 ， 
以 防 丢 失 。 


4.3.3 获取 FTP 服务 器 文件 信息 


当 用 户 编程 时 ， 需 要 获取 FTP 服务 器 文件 的 列表 ， 以 便 查看 文件 的 相关 信息 。 本 节 将 
向 用 户 讲述 怎样 获取 FTP 服务 器 文件 的 相关 信息 。 


1. 获取 文件 列表 
一 般 情 况 下 ，FTP 文件 列表 信息 是 通过 客户 端 和 服务 器 端 之 间 的 数据 通道 获取 。 编 程 
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中 ， 用 户 可 以 向 服务 器 发 送 LIST 命令 ， 服 务 器 接收 到 该 命令 以 后 会 向 客户 端 返回 FTP 目 
录 下 的 文件 列表 信息 。 需 要 用 户 注意 ， 在 PORT 模式 下 传输 数据 ， 客 户 端 需要 向 服务 器 提 
交 本 地 他 地址 和 用 于 返回 数据 的 端口 号 。 


CSocket m Client; // 客 户 端 套 接 字 变量 

CString m host; //IP 地 址 字符 串 变量 

UINT nport,port=111; // 端 口号 

m Client.GetSockName (m host,nport); // 调 用 函数 获得 本 地 的 IP 地 址 
m host.Format (m host+",%d",port); // 格 式 化 字符 串 


用 户 使 用 PORT 命令 可 以 向 服务 器 发 送 端口 号 码 。 格 式 如 : “PORT”+string。 其 中 
string 表示 已 经 格式 化 的 卫 和 端口 字符 串 。 代 码 如 下 : 

m archive->Writestring ("PORT "+ m host+"\r\n"); 

// 调 用 Carchive 类 的 WriteString () 函数 发 送 

m archive->Flush(); 

客户 端 发 送 端口 之 后 ， 必 须 在 该 端口 上 进行 监听 ， 以 便 接 受 服务 器 的 连接 请 求 。 用 户 
需要 注意 , 在 服务 器 和 客户 端 连接 关闭 以 前 , 服务 器 均 按照 此 次 的 IP 和 端口 与 客户 端 进行 
数据 交换 。 监 听 代 码 如 下 : 

m Client.Create (111, SOCK_STREAM, NULL); // 创 建 在 111 端 口上 监听 的 套 接 字 

m Client.Listen(); // 进 行 监听 

现在 ， 用 户 可 以 向 服务 器 发 送 LIST 命令 获取 相关 文件 的 信息 。 发 送 LIST 命令 的 代码 
如 下 : 

Try 

{ // 尝 试 发 送 命 令 LIST 到 服务 器 ， 以 获取 文件 列表 

m archive->Writestring ("LIST "+"\r\n"); 


// 调 用 CArchive 类 的 Writestring () 函数 发 送 LIST 命令 


m archive->Flush (); 


Catch (CException e) 
{ MessageBox ("发 送 关闭 命令 失败 ! "); } // 抛 出 错误 并 处 理 错误 
当 用 户 向 服务 器 发 送 LIST 命令 后 ， 服 务 器 会 向 客户 端 提供 的 瑟 地 址 和 端口 号 发 出 连 
接 请 求 。 所 以 ， 当 客户 端 在 指定 端口 上 监听 到 连接 请 求 后 ， 应 该 对 该 连接 进行 处 理 。 
一 般 情 况 下 ， 用 户 将 套 接 字 设 置 为 非 阻塞 模式 ， 避 免 出 现 等 待 状态 。 当 监听 套 接 字 检 
测 到 有 连接 请 求 到 来 时 才 响应 ， 否 则 套 接 字 一 直 处 于 监听 状态 。 用 户 可 以 使 用 AP 函数 
Accept() 来 响应 服务 器 的 连接 请 求 。 代 码 如 下 : 


#define WM ACCEPT WM USER+100 // 自 定义 消息 ， 用 于 响应 连接 请 求 
afx_msg Void OnAccept (WPARAM wParam, LPARAM lParam) // 声 明 响应 连接 请 求 的 函数 
// 省 略 部 分 代码 


BEGIN_MESSRAGE MAP (CMyApp, CWinApp) 
//{{AFX MSG MAP (CMyAPP) 
// NOTE - the ClassWizard will add and remove mapping macros here. 
Wk DO NOT EDIT what you see in these blocks of generated code! 
//}}AFX MSG 
ON COMMAND (ID HELP, CWinApp::OnHelp) 
ON_MESSAGE (WM ACCEPT, OnAccept) // 处 理 消息 映射 
END MESSAGE MAP() 
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首先 ， 用 户 需要 自 定义 消息 WM_ACCEPT 用 于 响应 连接 请 求 ， 然 后 添加 消息 映射 将 


自 定义 消息 和 实现 函数 关联 起 来 。 在 Win32 API 中 ，WSAAsyncSelect0 函 数 可 以 将 套 接 字 
设置 为 非 阻塞 模式 ， 其 原型 如 下 : 


int WSAAsyncSelect (SOCKET s,HWND hwnd, int wMsg,long lEvent); 


用 户 使 用 该 函数 时 ， 应 该 包含 Windows Socket 的 头 文件 和 相应 的 库 文件 。 代 码 如 下 : 


#include <winsock2.h> // 包 含 Windows Socket 头 文件 
#pragma comment (lib, "WS2 32.1ib") // 编 译 时 连接 Ws2_32 库 


使 用 函数 WSAAsyncSelectO 时 ,参数 wMsg 表示 自 定义 消息 WM_ACCEPT。 参 数 1Event 


表示 通知 码 ， 其 取 值 如 表 4.6 所 示 。 该 函数 调用 成 功 后 ， 会 一 直 检查 通知 码 ， 直 到 指定 的 
网 络 事件 发 生 ， 否 则 将 返回 0。 


表 4.6 IEvent 取 值 


取 值 含义 
FD READ 表示 套 接 字 接 收 到 对 方 发 送 的 数据 ， 用 户 可 对 其 进行 读 取 
FD WRITE 通知 用 户 可 以 继续 发 送 数 据 
FD ACCEPT 表示 套 接 字 上 有 连接 请 求 到 来 
FD CONNECT 套 接 字 连 接 成 功 
FD CLOSE 套 接 字 检 测 到 对 应 的 连接 被 关闭 


在 这 里 , 用 户 只 检测 有 无 连接 请 求 到 来 ， 所 以 IEvent 设置 为 FD_ACCEPT。 代码 如 下 : 


::WSAAsyncSelect (m Client,m hSocket,this->m hWnd, WM ACCEPT, FD ACCEPT| 
FD READ); 

// 将 套 接 字 设 置 为 非 阻塞 模式 
当 有 对 应 的 套 接 字 请 求 到 来 时 ， 程 序 调用 自 定义 消息 响应 函数 进行 处 理 。 代 码 如 下 : 


void OnAccept (WPARAM wParam, LPARAM lParam) 


SOCKET ss; 

sockaddr in adder; 

char sz[1024]={0}; // 定 义 缓冲 区 
switch (LOWORD (lParam) ) // 参 数 lParam 的 低 字 节 表示 通知 码 
{ case FD ACCEPT; // 检 测 到 有 连接 请 求 到 来 


SSs=: :Accept (m Client.m hSocket,adder, sizeof (adder)); 


// 接 受到 来 的 连接 请 求 , 返回 一 个 临时 套 接 字 


i // 省 略 部 分 代码 
case FD READ: 
::recv(ss, &sz,1024,0); // 接 收 数据 到 缓冲 区 
// 省 略 部 分 代码 


客户 端 检测 到 连接 请 求 后 ， 调 用 函数 recv0 进 行 接收 ， 并 将 数据 保存 在 缓冲 区 sz 中 。 


关于 接收 到 的 列表 信息 如 何 进行 显示 等 操作 将 在 最 后 一 节 实例 中 讲述 。 在 这 里 ， 用 户 需 要 
注意 函数 AcceptO 调 用 成 功 后 会 返回 一 个 临时 套 接 字 的 句柄 。 


2. 获取 FTP 文 件 属性 
用 户 发 送 LIST 命令 以 后 ， 服 务 器 返回 信息 中 包含 了 文件 的 一 些 属性 ， 包 括 时 间 、 大 
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小 等 。 服 务 器 返回 的 每 条 信息 都 是 以 “\rn” 结 束 ， 在 每 条 信息 中 以 空格 分 开 。 
首先 ， 用 户 需要 对 缓冲 区 sz 中 的 数据 进行 解析 得 到 一 条 完整 的 消息 。 代 码 如 下 : 


char buf[100]={0}; // 用 于 保存 临时 数据 
for (int i=0;i<1024;i++) / /循环 解析 消息 数据 以 获得 一 条 完整 的 信息 
t 
if(sz[i]!="\")buf [i]==sz[i]; // 取 得 的 信息 不 是 “\”， 则 保存 到 临时 变量 
else 


{ if(sz[i+1]=="r")MessageBox ("成 功 解析 一 条 消息 ! "); 
// 如 果 取 得 的 是 结束 符号 ， 则 提示 成 功 提取 
D 
} 
上 面 的 代码 用 于 提取 一 条 完整 的 信息 ， 并 将 其 保存 在 临时 变量 buf 中 。 接 下 来 ， 用 户 
可 以 对 提取 到 的 信息 再 进行 详细 的 解析 ， 以 便 得 到 具体 的 文件 属性 。 代 码 如 下 : 


char ch="a"; // 初 始 化 字符 变量 
CString atre""y // 定 义 字符 串 
int i=0,j=0; // 定 义 循环 变量 


while(ch!=""&&i<1024) 


if(buf[i]!=""&&buf[i+1l]==-EOF) str+=(CString)buf[i]; 


// 如 果 不 是 空格 则 保存 在 字符 串 变量 中 
else 
{ 
ch=buf [i+1]; // 如 果 是 空格 则 移动 到 下 一 个 字符 
i+=1; 
i 
Srp // 将 字符 串 变量 重新 设置 
switch(j) // 根 据 变量 j 进行 选择 信息 字符 段 
{ 
case 1: 
MessageBox ("文件 最 后 一 次 保存 的 日 期 是 : %c", str) ; 
case 2: 
MessageBox ("文件 最 后 一 次 保存 的 时 间 是 : %c", str); 
case 3: 
MessageBox ("文件 的 大 小 是 : $c",atoi (str)); 
case 4: 


MessageBox ("文件 的 名 称 是 : %c", str); 
} 
上 述 代 码 实现 的 功能 是 对 一 条 信息 进行 分 析 , 得 到 文件 准确 的 保存 日 期 、 时 间 和 大 小 。 
用 户 需要 了 解 在 Windows 下 , FTP 服务 器 返回 的 信息 格式 , 例如 , 08-23-12 10:06AM 16056 
listtxt。 该 字符 串 第 一 段 “08-23-12” 表 示 文 件 保 存 的 日 期 。 第 二 段 “10:06AM ”表示 保存 
时 间 。 第 三 段 “16056” 表 示 文 件 大 小 。 第 四 段 “listtxt” 表 示 文 件 名 称 。 
关于 获取 FTP 文件 其 他 属性 的 方法 ， 请 用 户 参 考 其 他 书籍 ， 本 书 将 不 再 进行 讲述 。 


4.3.4 上 传 文件 


} 


向 FIP 服务 器 上 传 文件 的 功能 是 当 用 户 使 用 FTP 客户 端 时 ,会 经 常 使 用 到 的 一 个 功能 。 
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若 想 实现 该 功能 ， 上 传 文件 的 命令 应 该 是 STOR 或 者 *sSTOU。STOR 命令 会 覆盖 原 有 文件 ， 
而 *STOU 命令 则 不 覆盖 已 经 存在 的 文件 。 当 上 传 命令 发 送 后 ， 用 户 便 可 以 直接 传送 文件 。 
代码 如 下 : 


m archive->Writestring ("STOR "+"\r\n"); 


// 调 用 CArchive 类 的 Writestring () 函数 发 送 STOR 命令 


char buff[1024]={0}; // 设 置 缓冲 区 
SOCKET sock; // 与 服务 器 建立 连接 成 功 后 返回 的 套 接 字句 柄 
CFile file("list.txt",CFile::modeReadWrite); 

// 关 联 文件 并 指定 文件 属性 为 可 读 可 写 
file.Read (buff, 1024); // 读 取 文件 内 容 到 缓冲 区 中 
file.close(); // 读 取 完 毕 ， 关 闭 文件 


::Send(sock,buff,1024,NULL); ”// 调 用 Send() 函数 发 送 文件 内 容 到 FTP 文件 


在 代码 中 ， 用 户 必须 先 发 送 STOR 命令 到 服务 器 ， 再 将 本 地 文件 的 内 容 读 取 到 指定 的 
缓冲 区 中 , 利用 函数 Send0 传 送 到 服务 器 。 这 里 利用 4.3.3 节 中 与 服务 器 连接 成 功 后 返回 的 
套 接 字 进行 传送 数据 。 


外 注意 : 用 户 上 传 文件 到 FTP 服务 器 时 ， 如 果 不 希 望 覆 盖 原 有 的 文件 ， 则 应 该 将 STOR 
命令 改 为 *STOU 命令 。 


因为 大 部 分 文件 的 结束 表示 都 是 EOF， 所 以 当 用 户 需要 上 传 比较 大 的 文件 时 ， 应 该 利 
用 循环 读 取 文 件 的 方式 进行 编程 。 


4.3.5 ”下载 文件 


当 用 户 从 FTP 服务 器 下 载 文件 时 ， 使 用 到 的 FTP 命令 是 RETR。 该 命令 的 用 法 与 上 传 
命令 的 用 法 相似 。 首 先 ， 客 户 端 向 服务 器 发 送 RETR 命令 ， 然 后 根据 获取 的 文件 大 小 ， 利 
用 函数 Recv0 进 行 接收 。 如 果 接 收 到 的 数据 小 于 文件 大 小 则 继续 接收 ， 否 则 关闭 数据 连接 
即 可 。 获 取 文 件 大 小 和 文件 名 称 的 方法 在 4.3.3 节 中 已 经 讲解 ， 这 里 不 再 歼 述 。 下 载 文件 
的 代码 如 下 : 


int lenth; // 已 经 获取 的 文件 大 小 
CString filename; // 已 经 获取 的 文件 名 称 
int i=0; 


m archive->Writestring ("RETR "+"\r\n"); 
// 调 用 CArchive 类 的 WriteString () 函数 发 送 RETR 命令 
char buff[1024]={0}; // 设 置 缓冲 区 
SOCKET sock; // 与 服务 器 建立 连接 成 功 后 返回 的 套 接 字句 柄 
CFile file(filename,CFile::modeReadWrite); // 建 立 文件 并 指定 文件 属性 为 可 读 可 写 
while (LIenth!=0) 
: :Recv (sock,buff,1024, NULL); ”// 在 套 接 字 上 接收 数据 到 缓冲 区 中 
file.Write (buff,1024); // 将 缓冲 区 内 容 写 到 文件 中 
lenth=lenth-1024; // 从 文件 总 大 小 中 减 去 已 经 接收 并 写 入 文件 中 的 大 小 
} 


MessageBox ("文件 下 载 成 功 ! "); // 否 则 提示 文件 下 载 成 功 


在 代码 中 ， 用 户 也 可 以 使 用 获取 到 的 文件 大 小 设置 接收 缓冲 区 大 小 ， 但 是 这 样 做 会 导 
致 一 些 不 可 预见 的 错误 发 生 。 
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4.4 ”创建 客户 端 


本 节 将 用 具体 的 FTP 类 和 方法 进行 编程 , 使 用 户 对 FTP 编程 知识 进一步 巩固 。 在 实例 
中 ， 首 先进 行 工程 的 创建 、CFtp 类 的 封装 ， 然 后 使 用 CFtp 类 进行 编程 应 用 。 
4.4.1 建立 工程 


用 户 在 VC 中 建立 基于 对 话 框 的 FTP 客户 端 工 程 ， 可 以 直接 通过 向 导 创 建 。 具 体 步 又 
如 下 : 
(1) 打开 VC， 选 择 “ 文 件 ”|“ 新 建 ”命令 ,打开 “新 建 ”对 话 框 ， 如 图 4.2 所 示 。 


文件 工程 | 工作 区 | 基文 栏 | 


工程 名 种 (M: 
FP 


位 于 tl: 
[ENDOCUMENTS AND SETTINGS | 


5 剖 建 新 的 工作 宇 问 [R] 
个 汪 加 到 当前 工作 宝 间 风 
三 从 属于 


四 wsz Satc Ubrary 
平台 中; 


柄 


图 4.2 新 建 MFC 工程 


(2) 在 “工程 ”选项 卡 中 ， 选 择 MFC AppWizard[exe] 项 。 在 “工程 名 称 ” 文 本 框 中 输 
入 项 目 名 称 ， 本 节 实 例 名 为 FTP， 然 后 选择 保存 路 径 。 单 击 “ 确 定 ” 按 钮 ， 进 入 如 图 4.3 
所 示 的 界面 。 


您 要 创建 的 应 用 程序 类 型 是 : 
三 单 六 机 [8 

此 重 文人 4 

" BFAD 


打 六/ 吉 看 体系 入 村 支持 MM 


得 的 资源 使 用 的 语言 是 : 
| 中 文中 国 ] APPWZCHS.DLU 了 


seEms :| 


4.3 选择 基于 对 话 框 项 目 
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(3) 在 图 4.3 中 ， 选 择 “基本 对 话 框 ” 单 选 按钮 ， 其 他 的 选项 默认 ， 单 击 “ 下 一 步 ” 
按钮 ， 进 入 如 图 4.4 所 示 的 界面 。 


您 是 否 希 望 包含 : 
末 " 哄 于 对 放 枉 
厂 上 下 文 相 关 帮 有 动 
杰 3 让 观 

您 项 望 包含 秆 么 其 他 支持 ? 
厂 自动 操作 四 
忆 Adqivex 控件 四 

您 希望 包含 WOSA 支持 吗 ? 
F Windows Sockets [WM] 


对 话 框 的 标题 是 ， 
FTA 


< 上 - 步 


图 44 选择 Windows Sockets 项 目 


由 于 在 实例 程序 中 需要 使 用 WinSock， 所 以 这 里 需要 选择 Windows Sockets 复 选 框 ， 
其 他 选项 默认 。 

(4) 选择 “下 一 步 ” 按 钮 ， 进 入 如 图 4.5 所 示 界 面 ， 直 接 单 击 “完成 ”按钮 即 可 完成 
项 目的 建立 。 

完成 设置 以 后 ， 将 进入 VC 主 界面 。 由 于 本 项 目 基 于 对 话 框 模式 ， 所 以 用 户 需 要 拖 动 
所 需 控件 到 对 话 框 面板 上 即 可 ， 界 面 的 最 终 效果 如 图 4.6 所 示 。 关 于 添加 消息 映射 等 具体 
操作 将 在 4.4.3 节 中 进行 讲解 。 到 这 一 步 ， 该 实例 工程 已 经 建立 完毕 。 


用 和 蝇 站 |。 关 SD:| 过手 服务器 


Ps: [am 生生 |FoS rm <WS8 


[ 辐 
文 和 | MM | 大 小 XH 和 名 | EMM | 大 小 本 


您 净 望 使 用 MFC 库 吧 ? 


< 上 - 步 下沙 >] 完 度 | 阳光 


图 4.5 完成 设置 图 4.6 界面 截图 


在 对 话 框 中 ， 用 户 首先 输入 服务 器 地 址 (端口 号 码 默 认为 21) 、 用 户 名 和 密码 ， 然 后 
单 击 “ 连 接 服 务 器 ”按钮 连接 指定 FTP 服务 器 。 客 户 端 与 服务 器 的 连接 状态 和 用 户 操 作 等 
信息 均 会 显示 在 中 间 的 编辑 框 中 。 部 分 控件 D 以 及 其 表示 内 容 如 表 4.7 所 示 。 
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表 4.7 部 分 控件 ID 以 及 表示 内 容 
本 地 文件 | 服务 器 文 


容 | 服 务 器 地 址 端口 号 码 | 用户 名 密码 | 客户 端 状 态 连接 按钮 


D |IDC_EDITI1IIDC EDIT2|IDC EDIT3 |IDC EDIT4 |IDC EDITS |IDC LIST!1 |IDC LIST2|IDC Connect 


4.4.2 定义 CFtp 类 


CFtp 类 是 用 户 自 定义 实现 FTP 功能 和 原理 非常 重要 的 类 。 在 本 节 中 , 用 户 将 学 习 到 怎 
样 在 VC 环境 中 定义 和 封装 CFtp 类 。 首 先 定义 头 文件 Ftp.h， 代 码 如 下 : 


class CFtp // 定 义 CFtp 类 
{ 
public: 
CString ipaddr, name,password; //IP 地 址 、 用 户 名 、 密 码 
int port; // 端 口号 码 
BOOL FTPConnect (CString severhost,int port); / /连接 FTP 服 务 器 
CSocket *m clientsocke; // 套 接 字 对 象 
CArchive *archive; // 串 行 化 对 象 
CSocketFile *socketfile; // 套 接 字 文 件 对 象 
private: 
Cstring Recv(); / /接收 命令 消息 
Void Send(CString st); // 发 送 命 令 消息 
Void UpdataFile (CString str); // 上 传 文件 
Void DownLoadFile (CSstring strl); // 下 载 文 件 
Void GetFilestatul(char ch); // 获 取 文 件 属性 


i 


从 上 面 的 CFtp 类 声明 中 ， 用 户 可 以 看 到 FTP 编程 相关 的 数据 和 实现 方法 。 下 面 将 根 
据 FTP 基本 功能 介绍 每 个 函数 。 首 先 ， 客 户 端 应 该 连接 服务 器 ， 登 录 方 式 为 匿名 。 其 函数 
实现 如 下 : 


BOOL CEFtp: :ETPConnect (CString severhost, int port) 


CSocket *m clientsocket=new CSocket(); / /构造 连接 套 接 字 对 象 
m clientsocket->Create (21, SOCK STREAM,FD READI|FD WRITE,NULL); 
// 创 建 流 式 套 接 字 
if(!m clientsocket) // 判 断 套 接 字 对 象 创建 是 否 成 功 
{ MessageBox (" 套 接 字 创建 失败 ! ") 7 
return false; } // 创 建 m_clientsocket 失败 
if(!(m clientsocket->Connect ( (atoi) severhost, port))) 
return false; // 连 接 FTP 服务 器 
else 
{ return true;} // 连 接 成 功 将 返回 true 
} 


客户 端 连 接 FTP 服务 器 ， 成 功 则 返回 tme， 否 则 返回 false。 如 果 连 接 成 功 ， 则 需要 向 
服务 器 发 送 命令 以 初始 化 服务 器 和 获取 服务 器 文件 列表 。 函 数 Send0 定 义 如 下 : 
Void CEFtp: :Send(CString charstring) // Send () 函数 发 送信 息 到 服务 器 


{ CSocketFile * socketfile; // 定 义 对 象 指针 
socketfile =new CSocketFile(m clientsocket); 
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// 关 联 对 象 m_clientsocket 是 创建 的 套 接 字 


archive=new CRrchive (&m sockfile, CArchive::load| CArchive::store); 

// 创 建 对 象 m_archive 的 实例 并 指定 属性 
charstring=""USER"+lymlrl+"PASS"+123456"; // 构 造 字符 串 charstring 
archive.Writestring(™ "+"\r\n"); // 向 服务 器 发 送 空 字符 串 进行 初始 化 

try{ 
archive ->Writestring (charstring +"\r\n"); 
// 调 用 CArchive 类 的 Writestring 发 送 命 令 
archive ->Flush(); // 强 制 写 入 命令 到 服务 器 
} 
Catch (CException e) // 处 理 被 抛 出 的 异常 
{ 


MessageBox ("发 送 关闭 命令 失败 ! ") 7 

} 

} 

当 命令 发 送 后 ， 服 务 器 会 返回 客户 端 请 求 的 数据 。 函 数 Recv0 的 实现 如 下 : 


// Recv () 函数 接收 服务 器 返回 的 数据 
Cstring CFtp::Recv() 
L 


CString recvstr=" "7 // 初 始 化 字符 串 recvstr 为 空 
if(archive->ReadString (recvstr)) // 接 收 返回 信息 并 放 到 recvstr 变量 
| 


if(recvstr=="”") MessageBox ("接收 数据 为 空 ") ; // 如 果 接 收 的 数据 为 空 则 提示 
{ MessageBox (" 接 收 数据 成 功 ") ; 


return recvstr; // 返 回 数据 
by // 返 回 接收 到 的 数据 
else 


{ 
MessageBox ("接收 数据 失败 ") ; 
} // 提 示 接 收 数据 失败 


i 

函数 Recv0 利 用 “archive->ReadString(recvstr)” 读 取 服 务 器 返回 的 数据 或 者 其 他 信息 。 
其 中 ， 包 括 文件 的 属性 等 信息 。 用 户 可 以 从 服务 器 返回 的 数据 中 读 取 文件 的 属性 。 函 数 实 
现 如 下 : 


Void CFtp::GetFilestatu(char car) // 参 数 car 表示 接收 到 的 数据 
{ 

char buf[100]={0}; // 用 于 保存 临时 数据 

char ch="a"; // 初 始 化 字符 变量 
Cotring Str=*" // 定 义 字符 串 
TE // 定 义 循环 变量 
for (int i=0;i<1024;i++) // 循 环 解析 消息 数据 以 获得 一 条 完整 的 信息 
| 

if(car[i]!="\")buf[i]==car[i]; // 取 得 的 信息 不 是 “\”， 则 保存 到 临时 变量 
else 


{ 
if (car[i+1]=="r")MessageBox ("成 功 解析 一 条 消息 ! "); 
// 如 果 取 得 的 是 结束 符号 ， 则 提示 成 功 提取 
} 
} 
while(ch!=""&&i<1024) 
{ 


if(buf[i]!=""&&buf [i+l1]==EOF) str+=(CString)buf[i]; 
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// 如 果 不 是 空格 ， 则 保存 在 字符 串 变 量 中 


else 
ch=buf [i+1]; // 如 果 是 空格 ， 则 移动 到 下 一 个 字符 
ii+=]7 
str=""; // 将 字符 串 变量 重新 设置 
} 
switch(j) / /根据 变量 j 进行 选择 信息 字符 段 
. 
case 1: 
MessageBox ("文件 最 后 一 次 保存 的 日 期 是 : sc", str) 7 
// 打 印 文 件 各 属性 
case 2: 
MessageBox ("文件 最 后 一 次 保存 的 时 间 是 : sc", str) 7 
case 3: 
MessageBox ("文件 的 大 小 是 : $c",atoi (str)); 
Case 4: 


MessageBox ("文件 的 名 称 是 : $c", str); 
} 
} 
} 
函数 GetFileStatu0 根 据 参数 car 所 指向 的 接收 内 容 数组 ， 通 过 循环 方式 获取 一 条 完整 
的 信息 ， 然 后 再 从 这 条 信息 中 取得 各 属性 。 

CFtp 类 中 很 重要 的 作用 是 上 传 和 下 载 文件 ， 这 两 个 功能 的 实现 方法 如 下 : 
Void CEFtp::UpdataFile(CString str) // 参 数 str 表示 上 传 文件 的 路 径 


archive->Writestring ("STOR "+"\r\n"); 
// 调 用 CArchive 类 的 WriteString () 函数 发 送 STOR 命令 


char buff[1024]={0}; // 设 置 缓冲 区 

SOCKET sock; // 与 服务 器 建立 连接 成 功 后 返回 的 套 接 字 句柄 

CFile file(str,CFile::modeReadWrite); // 关 联 文件 对 象 并 指定 文件 属性 为 可 读 可 写 
file.Read (buff, 1024); // 读 取 文件 内 容 到 缓冲 区 中 
file.close(); // 读 取 完 毕 ， 关 闭 文件 

::Send(sock, buff, 1024, NULL); // 调 用 Send () 函数 发 送 文件 内 容 到 FTP 文件 


} 


函数 UpdataFile0 根 据 参 数 str 所 指定 的 本 地 文件 路 径 上 传 文件 。 首 先 读 取 本 地 文件 内 
容 到 缓冲 区 中 ， 利 用 函数 Send0 将 缓冲 区 的 内 容 发 送 到 服务 器 。 下 载 文件 函数 
DownLoadFile0 的 实现 方法 与 函数 UpdataFile0 一 样 ， 其 具体 实现 如 下 : 


Void CEtp::DownLoadEile (CString filename) 
// 参 数 filename 表示 从 列表 中 获取 的 文件 名 
{ 


int lenth; // 已 经 获取 的 文件 大 小 
int i=0; 
archive->Writestring ("RETR "+"\r\n"); 

// 调 用 CArchive 类 的 Writestring () 函数 发 送 RETR 命令 
archive->Writestring (filename +"\r\n"); // 向 服务 器 发 送 将 要 下 载 的 文件 名 称 
char buff[1024]={0}; // 设 置 缓冲 区 
SOCKET sock; // 与 服务 器 建立 连接 成 功 后 返回 的 套 接 字句 柄 


CFile file(filename,CFile: :modeReadWrite); // 建 立 文件 并 指定 文件 属性 为 可 读 可 写 
while(lenth!=0) 
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{ 

: :Recv(sock,buff,1024,NULL) ; ”// 在 套 接 字 上 接收 数据 到 缓冲 区 中 

file.Write (buff,1024); // 将 缓冲 区 内 容 写 到 文件 中 

lenth=lenth-1024; // 从 文件 总 大 小 中 减 去 已 经 接收 并 写 入 文件 中 的 大 小 


本 节 封 装 了 CFtp 类 发 送 命令 、 接 收 数据 、 获 取 文件 属性 和 上 传 下 载 文件 等 FTP 主要 


操作 。 用 户 在 程序 中 使 用 该 类 时 ， 应 将 其 头 文件 “Ftp.h” 和 “Ftp.cpp” 加 入 到 工程 中 ， 然 
后 创建 CFtp 类 对 象 对 各 函数 进行 调用 即 可 。 


4.4.3 ”使 用 CFtp 类 编程 


如 图 4.6 所 示 ， 用 户 登录 服务 器 的 方式 可 以 是 程序 默认 的 匿名 登录 ， 同 时 也 可 以 使 用 


指定 账号 登录 。 其 响应 代码 如 下 : 


void CEFTPD1g: :OnRadio2 () 


this->GetD1gItem(IDC_EDIT3)->EnableWindow (true);  // 禁 用 IDC_EDIT3 编辑 框 
this->GetDlgItem(IDC EDIT4)->EnableWindow (true) 7 
// 禁 用 IDC_EDIT4 编辑 框 
} 


当 用 户 输入 服务 器 P 地 址 等 信息 后 ， 单 击 “ 连 接 服务 器 ”按钮 ， 程 序 根据 用 户 提供 的 


信息 对 服务 器 进行 连接 。 该 按钮 对 应 的 消息 响应 函数 代码 如 下 : 


void CEFTPD1g: :OnConnect () 
上 


CString str,strl; // 定 义 字符 串 变量 
int port=0; // 定 义 端口 变量 
this->GetD1gItem(IDC_EDIT1)->GetWindowText (str); // 获 取 IP 字符 串 
this->GetD1gItem(IDC_EDIT2)->GetWindowText (str1); // 获 取 端 口号 码 
port=(int)atoi (str1); // 将 端口 字符 串 转换 成 数字 

if (ftp.FTPConnect (str, port)) // 调 用 CFtp 对 象 的 函数 进行 连接 


this->GetD1gItem(IDC_EDIT5)->SetWindowText (" 连 接 成 功 !") ; // 通 知 用 户 连 接 状态 
this->GetDlgItem(IDC Connect) ->EnableWindow (false) 


// 连 接 成 功 后 ， 设 置 连 接 按钮 为 失效 状态 


ftp.Send ("LIST/r/n"); // 发 送 命令 获取 文件 列表 信息 
str=ftp. Recv(); // 接 收 数据 
ftp.GetFilestatu(str.GetAt (0)); // 获 取 文 件 名 称 

BE 


在 客户 端 启动 时 , 应 该 能 获取 到 本 地 默认 文件 夹 下 的 文件 。 在 VC 中 , 查找 文件 的 API 


函数 主要 是 FindFirstFile() 和 FindNextFileO) 函 数 。 函 数 原型 分 别 如 下 : 


// 开 始 查找 文件 并 获得 其 句柄 
HANDLE FindFirstEile( 
LPCTSTR lpFileName, 
FINDEX_ INFO LEVELS fInfoLevellId, 
LPVOID lpFindFileData, 
FINDEX SEARCH OPS fSearchOp, 
LPVOID lpSearchFilter, 
DWORD dwAdditionalFlags 
); 
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// 从 当前 位 置 查找 下 一 个 文件 


BOOL FindNextFilel( 
HANDLE hFindFile, 
LPWIN32_FIND DATA lpFindFileData 
); 
函数 FindFirstFile0 可 以 在 指定 盘 符 下 查找 文件 ， 并 将 获取 到 的 文件 数据 保存 到 缓冲 区 
中 ， 该 函数 返回 文件 查找 操作 的 句柄 。 参 数 IpFileName 表示 用 户 需要 查找 的 文件 名 。 如 果 
该 名 称 中 没有 包含 路 径 ， 则 程序 会 在 当前 目录 下 进行 查找 文件 ， 否 则 在 指定 路 径 下 查找 文 
件 。 在 文件 名 中 可 以 使 用 “*” 等 通配符 代替 ， 如 下 : 
lpFileName="C:\\windows\\*.*"; // 在 c:\\windows\\ 下 查找 所 有 文件 
lpFileName="C:\\windows\\*.txt";  ”// 在 目录 CcC:\\windows\\ 下 查找 所 有 TXT 文件 


lpFileName="C:\\windows\\vtk.bin"; // 在 目录 C:\\windows\\ 下 查找 文件 vtk.bin 
lpFileName="C:\\windows\\*.exe"; ”// 在 目录 C:\\windows\\ 下 查找 所 有 EXE 文件 


函数 FindNextFile0 可 以 继续 查找 其 他 格式 的 文件 操作 。 参 数 hFindFile 表示 函数 
FindFirstFile0 返 回 的 操作 句柄 。 人 参数 lpFindFileData 指向 结构 体 WIN32 FIND DATA， 保 
存 了 程序 所 找到 的 文件 名 和 文件 属性 等 数据 。 该 函数 调用 成 功 返 回 tue， 和 否则 ,返回 false。 
WIN32 FIND_DATA 结构 如 下 : 

typedef struct WIN32 FIND DATA { 


网 


DWORD dwFileAttributes; // 文 件 属性 
FILETIME ftCreationTime; // 文 件 创建 日 期 
FILETIME ftLastAccessTime; // 文 件 最 后 保存 日 期 
FILETIME ftLastWriteTime; // 文 件 最 后 修改 日 期 
DWORD nFilesizeHigh; // 文 件 长 度 的 高 32 位 
DWORD nFileSizeLow; // 文 件 长 度 的 低 32 位 
DWORD dwReserved0; // 现 在 保留 

DWORD dwReservedl1; // 现 在 保留 

TCHAR cFileName [MAX-PATH]; // 本 次 查找 到 的 文件 名 
TCHAR cAlternateFileName[14]; // 文 件 的 短文 件 名 


} WIN32_FIND DATA; 
全 注意 : 参数 cAltermateFileName[14] 表 示 文件 的 短文 件 名 。 例如 ,文件 路 径 为 C:\\windows\\ 
Vtk.bin 的 文件 短 名 称 为 vtk.bin。 
用 户 在 客户 端 启动 时 ， 可 以 使 用 上 面 两 个 函数 进行 文件 的 查找 。 其 代码 如 下 : 


BOOL CFTPD1g::OnInitDialog() 
{ 


we // 省 略 部 分 代码 

int i=07 

LVITEM item={0}; // 初 始 化 列表 结构 
item.mask=LVIF TEXT // 指 定 pszText 域 有 效 
WIN32_FIND DATA filedata={0}; // 初 始 化 结构 体 WIN32_FIND_DATA 
HANDLE filehand; // 文 件 句 柄 


filehand=: :FindFirstFile("C:\\*", gfiledata); // 查 找 C 盘 下 所 有 文件 

while(::FindNextFile(filehand, &filedata)) 

{ 

item.pszText=(LPTSTR) filedata. cFileName; // 将 文件 名 称 赋 给 列表 项 
this->GetDlgItem(IDC LIST1)-> InsertColumn (i,& item) ; // 在 列表 中 插入 栏目 名 称 
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i+=17 


return TRUE7 


除了 上 述 获 取 文件 的 方式 以 外 ， 还 可 以 通过 用 户 选择 的 特定 盘 符 进行 获取 。 其 中 ， 响 


应 用 户 选择 的 函数 是 CFTPDlg::OnSelchangeCombo10， 代 码 如 下 : 


件 并 


void CEFTPD1g: :OnSelchangeCombol () // 组 合 框 选择 消息 响应 
{ 
Cstring str; // 定 义 字符 串 变量 
int i=m cl.GetCurSel()7 // 获 取 用 户 单 击 位 置 的 索引 
m cl.GetLBText (i, str) 7 // 获 取 索 引 处 的 字符 
stri=" 让 “7 // 添 加 通配符 “*” 
WIN32_FIND DATA filedata={0}; // 初 始 化 结构 体 WIN32_FIND_DRTR 
HANDLE filehand; // 文 件 句柄 


filehand=: :FindFirstFile(str, &filedata); ”// 查 找 特 定 盘 下 所 有 文件 
while(::FindNextFile(filehand, &filedata)) 

L 

item.pszText=(LPTSTR) filedata. cFileName; // 将 文件 名 称 赋 给 列表 项 
this->GetDlgItem(IDC LIST1)-> insertColumn (i,& item) ; // 在 列表 中 插入 栏目 名 称 
i+=1; 

| 


m_cl 是 CComboBox 类 的 对 象 。 通过 代码 ,程序 可 以 获取 用 户 所 选择 目录 下 的 所 有 文 
且 显 示 在 列表 中 。 用 户 获取 服务 器 文件 名 称 和 获取 本 地 文件 名 称 的 实现 方法 一 样 ， 使 


用 CFtp 类 函数 GetFileStatu0 获 取 服 务 器 文件 名 称 ， 然 后 设置 列表 控件 的 栏目 即 可 , 所 以 这 
里 不 再 歼 述 。 


在 本 地 文件 列表 中 ， 用 户 需要 响应 右键 消息 。 在 右键 消息 响应 函数 中 获取 文件 名 称 ， 


调用 CFtp 类 的 函数 UpDataFile0 上 传 文件 。 


获取 


void CEFTPD1g: :OnRclickListl (NMHDR* pNMHDR, LRESULT* PResult) 


{ 
Cstring strl; 
int i= this->GetDlgItem(IDC_LIST1)->Getcursel();  // 获 得 单 击 鼠 标 位 置 的 索引 
Cstring str= this->GetD1gItem(IDC_LIST1) ->GetText (i); 
// 获 取 索 引 位 置 的 文件 名 称 


WIN32_FIND DATA filedata={0}; // 初 始 化 结构 体 WIN32_FIND_DATA 
HANDLE filehand; 


filehand=::FindFirstFile("C:\\*",&filedata);  ”// 查 找 c 盘 下 所 有 文件 
while(::FindNextFile (filehand,&filedata) ) // 在 文件 中 查找 与 指定 文件 名 称 相同 的 文件 


| 
if(str==(LPTSTR) filedata. cFileName) 
1 


SEPTr "CE NN TSEre // 构 造 文 件 完整 路 径 
ftp. UpdataFile("str"); // 上 传 指定 文件 
}} 


上 传 函 数 中 , 使 用 列表 控件 中 的 函数 GetCurSel0 获 取 指定 索引 ， 再 调用 函数 GetTextO 
文件 名 称 。 然 后 使 用 函数 FindFirstFile0 和 FindNextFile0 查 找 对 应 文件 ,构造 完整 路 径 


后 调 


CFtp 类 函数 UpDataFileO 上 传 该 文件 。 
在 服务 器 文件 列表 中 ， 响 应 右键 消息 。 其 消息 响应 函数 如 下 : 
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void CEFTPD1g: :OnRclickList2 (NMHDR* pNMHDR, LRESULT* PResult) 
fi 
int i= this->GetDlgItem(IDC LIST1)->GetCurSel () ;  // 获 得 单 击 和 鼠标 位 置 的 索引 
Cstring str= this->GetDlgItem(IDC LIST1)->GetText (i); 

// 获 取 索 引 位 置 的 文件 名 称 
WIN32_FIND DATA filedata={0}; // 初 始 化 结构 体 WIN32_FIND_DRTR 
HANDLE filehand; 
filehand=: :FindFirstFile("ftp://127.0.0.1/ftp", tfiledata); 


/ /查找 服 务 器 下 ftp 文件 夹 中 内 容 
while(::FindNextFile(filehand, &filedata)) 


// 在 文件 中 查找 与 指定 文件 名 称 相同 的 文件 


{ 
if(str==(LPTSTR) filedata. cFileName) 
{ 


SEE ELBE//127.0:0.1\NELD\nTstrr // 构 造 文件 完整 路 径 

ftp.DownLoadFile (str); // 调 用 CFtp 类 的 DownLoadFile () 函数 进行 下 载 

} 

本 节 主 要 讲解 了 自 定义 类 CFtp 的 使 用 方法 ， 其 用 法 非常 简单 。 如 果 用 户 需 要 扩展 其 
内 容 ， 首 先 在 文件 “Ftp.h” 中 自 定义 函数 或 数据 。 然 后 在 “Ftp.CPP” 中 写 出 自 定义 函数 的 
代码 即 可 。 本 节 中 详细 代码 请 参考 光盘 中 4.4.3 小 节 文件 夹 。 


4.5 小 结 


本 章 主 要 向 用 户 讲解 了 FTP 的 原理 和 各 功能 的 实现 方法 。 通 过 连接 服务 器 、 发 送 验 证 
信息 、 发 送 命令 、 接 收 数据 和 上 传 下 载 文件 等 FTP 常用 操作 方法 进行 程序 编写 ， 并 封装 了 
自 定义 类 CFtp 类 。 用 户 可 以 通过 自 定义 类 中 的 方法 进行 编程 。 通 过 本 章 相关 知识 的 学 习 ， 
用 户 应 该 掌握 FTP 编程 的 基本 流程 和 方法 。 
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在 如 今 网 络 流行 的 时 代 中 , 大 多 数 用 户 都 在 使 用 微软 的 正 浏览 器 浏览 网 页 。 从 以 前 的 
静态 网 页 到 现在 丰富 多 彩 的 动态 网 页 ， 用 户 都 是 通过 网 页 浏览 器 进行 浏览 。 网 页 浏览 器 应 
该 具有 解析 HTML 代码 或 者 其 他 语言 (如 ASP.NET 等 ) 网 页 的 功能 。 本 章 将 向 用 户 介绍 
浏览 器 的 工作 原理 以 及 设计 流程 等 知识 。 


5.1 HTTP 请 求 


通常 情况 下 ,设计 过 网 页 的 用 户 都 会 知道 客户 端 浏览 器 通过 向 服务 器 发 送 HTTP 请 求 ， 
服务 器 接受 请 求 以 后 ， 将 相应 的 网 页 内 容 传 回 客户 端 进行 显示 。 这 就 是 常见 的 C/S (客户 
端 /服务 器 ) 网络 模型 。 客 户 端 程序 负责 解析 服务 器 传 回 的 网 页 内 容 。 

在 HITP 中 ， 请 求 就 是 客户 端 通过 向 服务 器 发 送 消息 要 求 提供 一 定 的 服务 的 过 程 。 请 
求 方式 有 两 种 : GET 和 POST。 


人 注意: C/S 模型 是 指 网 络 通信 的 双方 以 特定 角色 进行 数据 传输 。 例如 ,从 正 浏览 器 的 角 
度 来 说 ， 与 网 络 服务 器 进行 数据 传输 是 基于 C/S 模型 ， 浏 览 器 相当 于 客户 端 ; 而 
从 用 户 的 角度 来 说 ， 相 当 于 是 使 用 下 这 个 浏览 器 工具 与 服务 器 进行 数据 传输 ， 
所 以 该 种 方式 是 B/S 网 络 模型 。 


5.1.1 ,GET 方式 


GET 请 求 方式 在 网 页 设计 中 ， 被 用 来 在 客户 端 和 服务 器 之 问 交 换 数据 。 该 数据 包括 网 
页 HTML 内 容 、ZIP 或 RAR 等 附件 数据 。 当 向 服务 器 传送 数据 使 用 GET 方式 时 ， 传 送 的 
数据 会 被 显示 在 网 络 地 址 后 面 。 例 如 ,这 个 网 址 “http://218.6.132.5/luntan/?fromuid=539356”， 
所 表示 的 内 容 是 客户 端 首先 将 变量 fromuid 赋予 值 539356， 然 后 传送 到 服务 器 。 

根据 GET 请 求 方式 传送 数据 的 特点 ,用 户 可 以 知道 这 种 方式 是 不 安全 的 。 因 为 , 用户 
所 要 传送 的 数据 都 会 被 显 式 地 连接 在 网 址 后 面 ， 连 接 符号 是 “? ”。 但 是 ， 在 邮箱 中 下 载 
附件 时 所 用 的 方式 是 GET 方式 。 以 GET 方式 向 服务 器 传送 数据 的 HTML 代码 如 下 : 


<html> 
<head> 
<title>GET 方式 传送 数据 </title> 
</head> 
<body> 
<form id=forml name=forml method="get" action="http://127.0.0.1/get.html"> 
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<table border=0 cellPadding=1 cellSpacing=1 width=75%> 
<tr><td width=150> 姓 名 : </td> 

<td><input id=bl name="name"></td></tr> 
<tr><td width=150> 地 址 : </td> 

<td><input id=b2 name="addres"></td></tr> 
<tr><td width=150> 电 话 号 码 : </td> 

<td><input id=b3 name="number"></td></tr> 
<tr><td width=150> 邮 箱 : </td> 

<td><input id=b4 name="email"></td></tr> 
<tr><td><input type=submit value= 保 存 >&nbsp&nbsp<input type=reset value= 
重 置 ></td></tr> 
</table> 
</form> 
</body> 
</html> 


代码 在 正 浏览 器 中 运行 的 效果 如 图 5.1 所 示 。 


济 cET 方 式 传送 数据 - 了 icrosoft Internet Explorer 国 回 因 
文件 到) 编辑 到 ) 查看 WV 收 蔬 Q) 工具 CD) 帮助 0 E72 
© Fi D 国 国 的 甩 扫 雪 去 收 V 他 全 -总 国 -~ 
地 址 加) 笔 ] C:\Documents and Settines\Adninistrator\ 梨 面 \ 新 ;| 国 甘 到 链接 ” 
姓名 ， 

地 址 ， 

电话 号 码 ， 

邮箱 ， 

8] 区 司 
BE 壮 我 的 电脑 


5.1 代码 运行 效果 


用 户 在 表单 中 输入 姓名 、 地 址 、 电 话 号 码 和 邮箱 ， 单 击 “ 保 在” 按钮 ， 浏 览 器 会 将 数 
据 赋予 变量 并 连接 在 所 提交 的 网 络 地 址 后 面 进行 连接 服务 器 。 客 户 端 根据 用 户 所 填 内 容 构 
造 的 网 络 地 址 是 : http://127.0.0.1/get.html/ ? name=liang&addres=zhongguo&number= 
0233564545&email=lymlrl@163.com。 

用 户 需要 注意 ，GET 方式 会 受到 URL 的 最 大 长 度 限 制 ，URL 的 最 大 长 度 为 1024KB。 
所 以 ， 当 用 户 需 要 向 服务 器 传送 较 大 数据 时 ， 应 该 选用 POST 方式 进行 传送 。 


5.1:2 POST 方式 


与 GET 方式 相反 ，POST 方式 是 隐 式 地 进行 数据 传送 。 两 者 相 比 ，POST 方式 比较 安 
全 ， 因 为 用 户 所 传送 的 数据 不 会 被 显示 在 网 络 地 址 后 面 ， 并 且 可 以 传送 较 大 的 数据 ， 最 大 
可 以 达到 2MB。 
用 POST 方式 向 服务 器 提交 的 数据 通过 消息 结构 体 进行 传递 。 一 般 情况 下 ，POST 
方式 被 用 来 传递 用 户 所 提交 的 一 些 数据 。POST 方式 的 HTML 代码 如 下 : 


宣 


se 


器 。 


务 
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<html> 
<head> 

<title>POST 方式 传送 数据 </title> 
</head> 
<body> 
<form id=forml name=forml method="post" action="http: 
//127.0.0.1/get.html"> 
<table border=0 cellPadding=1 cel1Spacing=1 width=75%> 
<tr><td width=150> 姓 名 : </td> 

<td><input id=bl name="name"></td></tr> 
<tr><td width=150> 地 址 : </td> 

<td><input id=b2 name="addres"></td></tr> 
<tr><td width=150> 电 话 号 码 : </td> 

<td><input id=b3 name="number"></td></tr> 
<tr><td width=150> 邮 箱 : </td> 

<td><input id=b4 name="email"></td></tr> 
<tr><td><input type=submit value= 保 存 >&snbsp&nbsp<input type=reset value= 
重 置 ></td></tr> 
</table> 
</form> 
</body> 
</html> 


代码 运行 后 的 界面 与 GET 方式 相同 。 当 用 户 单 击 “ 保 存 ” 按 钮 以 后 ， 客 户 端 连接 服务 
同时 将 用 户 所 填写 的 表单 内 容 作为 消息 体 加 入 到 请 求 消息 中 ， 并 且 发 送 请 求 消息 到 服 
器 。 

1.3 请 求 消息 


请 求 消息 是 客户 端 为 了 获取 服务 器 上 的 资源 而 向 服务 器 发 送 的 消息 。 该 消息 结构 通常 


分 为 消息 头 和 消息 体 ， 如 上 面 所 讲 到 的 POST 方式 传递 数据 时 ， 就 会 用 到 消息 体 。 下 面 是 
一 个 缺少 消息 体 的 请 求 消息 : 


GET /FTP.html HTTP/1.1 

Hoste 127:0-0=1 

Accept: */* 

Referer: http://127.0.0.1/FTP1.html 
Connection: close 


上 面 的 代码 是 基于 GET 方式 的 ，Host 标题 字段 表示 服务 器 的 主机 地 址 。 该 代码 是 请 


求 服务 器 返回 相对 主机 地 址 为 /FTP.html 的 HTML 文件 。 


人 


页 


使 用 GET 方式 向 服务 器 传送 数据 的 请 求 消息 如 下 : 


GET /FTP.html/? name=liang& addrea=panzhihua HTTP/1.1 
Hosts 127.0.0.1 

Accept: */* 

Referer: http://127.0.0.1/FTP1.html 

Connection: close 


客户 端 向 服务 器 传送 数据 ， 相 当 于 向 FTP.html 页 面 传递 参数 。 参数 之 间 可 以 使 用 符号 
多 ”连接 。 用 户 利用 该 特点 可 以 不 用 打开 邮箱 而 下 载 邮箱 中 的 附件 ， 只 需要 改变 传 入 网 
的 参数 即 可 。 


°° 
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用 户 在 请 求 消息 中 ， 可 以 使 用 不 同 的 标题 字段 描述 请 求 的 附加 信息 或 者 客户 端 信息 。 
常见 的 消息 标题 字段 如 表 5.1 所 示 。 


表 5.1 常见 消息 标题 字段 


标题 字段 意 灸 
Accept 客户 端 希望 接收 的 媒体 类 型 
Accept-Encoding 客户 端 希望 接收 的 数据 的 编码 方式 
Accept-Charset 客户 端 希望 接收 的 数据 的 字符 集 
Form 指明 客户 端 所 提供 的 邮箱 地 址 
Authorization 客户 端 向 服务 器 提供 身份 验证 的 字段 
Range 用 于 要 求 服务 器 返回 部 分 数据 的 字段 
Referer 记录 客户 端 获得 资源 的 URL 地 址 
User-Agent 指明 客户 端 身份 的 字段 


5.2 HTTP 响应 


HTTP 响应 是 指 服务 器 对 客户 端的 请 求 作出 的 反应 ， 服 务 器 的 响应 也 是 通过 消息 实现 
的 。 与 请 求 消息 一 样 ， 响 应 消息 也 是 分 消息 头 和 消息 体 两 部 分 组 成 ， 但 是 两 者 之 问 需 要 使 
用 一 个 空白 行 分 开 。 在 消息 头 中 包含 了 响应 的 当前 状态 和 服务 器 的 一 些 信息 ， 消 息 体 中 则 
包含 了 响应 的 实体 数据 。 如 : 

HTTP/1.1 200 OK 

Date: Mon,21 Nov 2008 18:33:22 GMT 

Sever: Microsoft-IIS/6.0 

Accept-Ranges: bytes 

Content-Type: image/bmp 

Connection:close 

// 使 用 空白 行 隔 开 

(响应 的 二 进 制 实体 数据 》 // 实 体 数 据 

消息 的 第 一 行为 响应 的 当前 状态 信息 ， 后 面 接着 是 响应 的 标题 字段 信息 ， 空 白 行 后 的 
响应 的 实体 数据 。 下 面 将 向 用 户 详细 讲解 各 个 信息 的 内 容 以 及 表示 的 含义 。 


5.2.1 响应 状态 信息 
响应 的 状态 信息 包含 在 响应 消息 的 第 一 行 ， 由 HTTP 版 本 代号 、 响 应 码 和 响应 状态 描 


述 文本 组 成 。 其 中 ， 响 应 码 表 示 客 户 端 此 次 请 求 是 否 成 功 或 其 他 原因 出 错 。 用 户 可 以 从 响 
应 码 中 知道 具体 出 错 的 原因 ， 常 见 的 一 些 响应 码 类 别 ， 如 表 5.2 所 示 。 


表 5.2 部 分 常见 的 响应 码 类 别 


表示 请 求 已 经 被 服务 器 成 功 接收 、 理 解 
表示 客户 端 需要 根据 服务 器 返回 的 信息 作 进 一 步 请 求 
客户 端的 请 求 不 能 被 服务 器 理解 或 满足 

表示 服务 器 不 能 满足 或 完成 客户 端的 请 求 


300 一 399 
400 一 499 


“Se 
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表 5.2 中 仅 给 出 一 部 分 常见 的 响应 码 类 别 ， 如 果 用 户 需要 了 解 响应 的 具体 情况 ， 请 参 
考 RFC2068， 其 中 给 出 了 具体 响应 码 的 含义 。 例 如 ， 响 应 码 的 一 些 具体 含义 ， 如 表 5.3 
所 示 。 


表 5.3 ”响应 码 的 一 些 具体 含义 


响 应 码 下 沉 
201 服务 器 创建 了 一 个 新 资源 
202 服务 器 收 到 请 求 ， 但 未 处 理 完毕 
204 请 求 成 功 ， 但 返回 空 数据 
300 返回 多 个 请 求 结果 ， 供 客户 端 选择 
301 请 求 的 资源 已 经 移动 到 新 的 永久 URL 上 
302 请 求 资源 被 移动 到 一 个 临时 URL 上 
304 请 求 的 资源 没有 进行 更 新 
400 出 现 请 求 错误 
401 需要 认证 ， 而 请 求 没有 进行 认证 
403 服务 器 接收 请 求 但 不 能 访问 请 求 资源 
404 没有 找到 所 请 求 的 资源 
405 服务 器 不 允许 该 请 求 方式 
501 服务 器 还 没有 实现 请 求 的 方法 
502 网 络 的 网 关 出 现 错误 
503 服务 器 忙 


如 果 用 户 在 实际 编程 时 ， 需 要 知道 响应 的 具体 状态 信息 可 以 对 响应 消息 进行 读 操 作 ， 
然后 分 离 出 响应 码 即 可 。 在 RFC2068 中 ,对 一 些 扩展 的 响应 码 没 有 作出 相应 的 解释 。 这 种 
情况 可 以 简单 地 认为 该 响应 码 等 于 该 类 首 个 响应 码 的 解释 。 例 如 ， 响 应 码 333 〈 扩 展 的 编 
码 ) 在 RFC2068 中 没有 相应 的 解释 ， 可 以 认为 333 等 价 于 300 的 响应 码 解释 ， 表 示 返 回 多 
个 请 求 结果 供 客 户 端 选择 。 


5.2.2 ”响应 标题 字段 信息 


在 响应 标题 字段 信息 中 包含 了 服务 器 返回 除 响应 行 以 外 的 其 他 信息 。 
1. Location 标 题 


当 服 务 器 上 的 资源 被 保存 到 其 他 地 址 以 后 ， 服 务 器 会 将 新 地 址 返回 到 客户 端 ， 这 时 在 
响应 标题 字段 中 会 添加 Location 标题 。 该 标题 表示 资源 的 实际 位 置 ， 并 且 是 绝对 的 URL 
地 址 。 


HTTP/1.1 302 OK 

Date: Mon,21 Nov 2008 18:33:22 GMT 

Sever: Microsoft-IIS/6.0 

Accept-Ranges: bytes 

Content-Type: image/bmp 

Location: http://127.0.0.1/mp3/20080632.wma // 指 向 一 个 绝对 地 址 
Connection:close 
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通常 情况 下 ， 该 标题 与 响应 码 302 一 起 使 用 ， 表 示 客 户 端 所 请 求 的 资源 已 经 被 转 到 服 
务 器 的 另外 一 个 URL 上 。 

2. Server 标 题 

该 响应 标题 表示 服务 器 使 用 的 软件 名 称 和 版 本 信息 。 例 如 : 

Sever: Microsoft-IIS/6.0 


Server 标题 标识 了 服务 器 端 IS 软件 的 版 本 号 。 
5.2.3 ”实体 标题 字段 信息 


在 服务 器 的 响应 消息 中 含有 实体 数据 ， 这 些 数 据 由 实体 标题 进行 描述 。 
1. Content-type 标 题 

该 标题 可 以 用 于 指示 实体 数据 的 格式 ， 以 及 所 使 用 的 字符 集 。 
Content-type: text/html;charset=ASCII 


上 述 字 段 的 意思 是 实体 数据 是 文本 格式 的 HTML 文件 ， 所 使 用 的 字符 集 为 XLM。 如 
果 服 务 器 返回 一 幅 “XLM” 或 其 他 格式 的 图 片 到 客户 端 ， 则 该 字段 形式 应 如 下 : 


Content-type: image/jpg 
Content-type: image/bmp 


2. Content-Length 标 题 


该 标题 必须 与 Content-type 标题 一 起 使 用 , 用 于 表示 实体 数据 的 大 小 (以 字 节 为 单位 ) 。 
其 用 法 如 下 : 

HTTP/1.1 200 OK 

Date: Mon,21 Nov 2008 18:33:22 GMT 

Sever: Microsoft-IIS/6.0 

Accept-Ranges: bytes 

Content-Type: image/bmp 

Content-Length: 1024 

Connection:close 

上 述 字段 表示 在 服务 器 的 响应 消息 中 ， 实 体 数据 是 一 幅 bmp 格式 的 位 图 ， 其 大 小 为 
1024B。 关 于 一 些 不 常用 的 实体 标题 ， 如 Content-Language、Last-Modified、Content-Base 
等 标题 的 用 法 ， 请 读者 自行 参考 其 他 相关 资料 ， 本 书 不 再 獒 述 。 


5.2.4 实体 数据 
前 面 已 经 提 到 ， 在 服务 器 的 响应 消息 中 包括 了 消息 头 和 消息 体 两 部 分 。 其 中 ， 消 息 体 


中 包含 了 实体 数据 ， 并 且 在 消息 头 和 实体 数据 之 间 使 用 一 个 空白 行进 行 分 隔 。 例 如 ， 客 户 
端 向 服务 器 请 求 一 个 页 面 GET.html， 服 务 器 的 响应 消息 格式 如 下 : 


“se 
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HTTP/1.1 200 OK // 消 息 头 
Date: Mon,21 Nov 2008 18:33:22 GMT 
Sever: Microsoft-IIS/6.0 
RAccept-Ranges: bytes 

Content-Type: text/html 
Content-Length: 1024 

Connection: close 


// 用 空白 行进 行 分 隔 
<html> // 消 息 体 数据 
<head> 
<title>GET 方式 传送 数据 </title> 
</head> 
<body> 


<form id=forml name=forml method="get" action="http://127.0.0.1/get.html"> 
<table border=0 cellPadding=]1 cel1Spacing=1 width=75%> 
<tr><td width=150> 姓 名 : </td> 
<td><input id=b] name="name"></td></tr> 
<tr><td width=150> 地 址 : </td> 
<td><input id=b2 name="addres"></td></tr> 
<tr><td width=150> 电 话 号 码 : </td> 
<td><input id=b3 name="number"></td></tr> 
<tr><td width=150> 邮 箱 : </td> 
<td><input id=b4 name="email"></td></tr> 
<tr><td><input type=submit value= 保 存 >&nbsp&nbsp<input type=reset value= 
重 置 ></td></tr> 
</table> 
</form> 
</body> 
</html> 


在 上 面 的 响应 消息 中 ， 服 务 器 向 客户 端 返回 的 响应 消息 中 ， 响 应 码 200 表示 请 求 被 服 
务 器 理解 并 接收 。 返 回 的 实体 数据 是 一 个 网 页 内 容 ， 其 格式 为 *.html 格式 ， 大 小 为 1024B。 

总 之 ， 服 务 器 返回 的 响应 消息 类 似 于 C++ 语言 中 的 结构 体 ， 消 息 头 和 消息 体 就 是 这 个 
结构 体 里 面 的 元 素 。 用 户 在 使 用 HTTP 编程 时 ， 可 以 根据 需要 自 定义 一 个 结构 体 存 储 该 消 
息 数据 。 例 如 ， 自 定义 一 个 简单 的 消息 结构 体 。 


typdef struct 
{ 


char *messagehead; // 数 据 头 指针 
float i; // 实 体 数据 的 大 小 
char *messagebody; // 实 体 数据 指针 


} message; 


这 个 结构 体 的 用 法 很 简单 ， 例 如 利用 该 类 获取 响应 消息 的 响应 码 ， 代 码 如 下 : 


ssage msg; // 结 构 体 对 象 
Cstring str; // 存 放 响 应 码 
msg. messagehead=&recvdata; // recvdata 为 接收 到 的 响应 消息 
for (int i=9;i<=11;i++) // 响 应 码 位 于 数据 头 的 第 九 位 
{ 
str+= msg. messagehead+i; // 将 获得 的 响应 码 存放 于 str 中 
} 
int j=::atoi(str); // 将 str 转换 为 整 型 变量 
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str.Format ("消息 响应 码 为 : $d\n",j);  ”// 格 式 化 字符 串 

MessageBox (str); // 输 出 格式 化 字符 串 ， 通 知 用 户 消息 响应 码 

由 于 消息 响应 码 位 于 数据 头 的 第 九 位 到 第 十 一 位 ， 所 以 在 代码 中 直接 使 用 了 响应 码 准 
确 位 置 进行 查找 。 如 果 用 户 在 预先 不 知道 的 情况 下 ， 则 必须 利用 指针 进行 移 位 查找 。 当 
然 也 可 以 使 用 CString 类 进行 查找 ， 也 就 是 将 常用 的 一 些 响应 码 存 入 文件 中 ， 然 后 使 用 函 
数 CString::Find0 与 文件 中 的 数据 进行 比较 查找 亦 可 。 实现 的 方法 有 很 多 ， 有 具体 方法 视 用 户 
而 定 。 


5.3 ”制作 个 性 化 界面 


在 VC 中 制作 与 正 功能 相似 的 网 页 浏览 器 , 可 以 使 用 MFC 中 的 CHtmlView 类 , 也 可 
以 使 用 ActiveX 控件 类 CWebBrowser2 实现 网 页 浏览 器 的 开发 。 对 于 这 两 种 方法 ， 本 章 将 
分 别 进行 讲解 和 实例 编程 。 本 节 将 向 用 户 介绍 怎样 在 Visual C++ 6.0 中 制作 网 页 浏览 器 界 
面 ， 包 括 工 具 栏 等 编程 方法 。 


5.3.1 工具 栏 编程 


对 于 网 络 浏览 器 而 言 ， 工 具 栏 是 很 重要 的 一 部 分 ， 在 工程 中 使 用 工具 栏 可 以 方便 用 户 
的 操作 。 用 户 通 过 工具 栏 上 的 地 址 栏 输入 网 页 地 址 ， 然 后 进行 连接 浏览 。 该 工程 中 的 工具 
栏 应 当 包 括 浏览 记录 等 功能 按钮 ， 地 址 栏 和 连接 按钮 则 放置 到 另 一 对 话 框 上 。 


1. 界面 设计 


在 工程 中 添加 一 个 对 话 框 作为 地 址 栏 等 控件 的 面板 , ID 为 ID_DILOG, 将 组 合 框 与 连 
接 按 钮 放置 到 对 话 框 面板 上 ， 最 终 界面 如 图 5.2 所 示 。 


| 地 址 :「 可 连 接 | 
图 5.2 界面 效果 


界面 中 各 个 控件 ID 以 及 属性 如 表 5.4 所 示 。 
表 5.4 控件 ID 及 其 属性 


控件 ID IDC BUTTON! 
属性 连接 
用 处 连接 网 络 地 址 
界面 设计 好 以 后 ， 用 户 需 要 为 该 对 话 框 关联 一 个 新 类 。 在 VC 中 ， 使 用 鼠标 双击 该 对 
话 框 可 以 为 其 添加 相应 的 类 。 双 击 后 会 弹出 Adding a class 对 话 框 ， 如 图 5.3 所 示 。 选 择 
Create a new class 单 选 按 钮 ， 然 后 单 击 OK 按钮 ， 弹 出 New Class 对 话 框 ， 为 新 类 命名 和 指 
定 基 类 ， 如 图 5.4 所 示 。 
在 本 工程 中 ， 将 对 话 框 关联 的 类 名 设置 为 CTooldlg， 基 类 指定 为 CDialog。 


“Ws” 
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Namc- Feroniag 
i 
File name: Tooldigl .cpp wa 
Aading_a_Class j i 
IDD_DIALOG1 is a new resource. Since itis a ee = 
dialog resource you probably want to create a | 
new class for it. You can also select an or 
existing class. 
本 

None | 
人 aematin 
FF Create a new class) ereacabie ty ype i: PITT 
Select an existing class | 

图 5.3 Adding a class 对 话 框 图 5.4 New class 对 话 框 


2. 添加 对 话 框 到 工具 栏 


将 了 为 DD_DILOG 的 对 话 框 添加 到 工具 栏 中 ， 用 户 需 要 将 CTooldlg 类 对 象 设置 为 
CMainFrame 类 的 成 员 变 量 。 

首先 ， 在 CMainFrame 类 的 头 文件 “MainFrm.h” 开 头 处 添加 CTooldlg 类 的 头 文件 
“Tooldlgh”。 


区 本 // 省 略 部 分 代码 

#include "Tooldlg.h" // 包 含 croold1g 类 的 头 文件 
SR // 省 略 代码 

然后 ， 在 CMainFrame 类 中 声明 CTooldlg 类 对 象 dlg， 保 护 属性 为 protected。 
protected: 

protected: 

CstatusBar m wndstatusBar; // 声 明 状 态 栏 对 象 

CToolBar  m wndToolBar; // 工 具 栏 对 象 

CReBar m wndReBar; //CReBar 类 对 象 

CToold1g dilg; // 声 明 croold1g 类 对 象 dlg 
Se // 省 略 部 分 代码 


最 后 ， 在 CMainFrame::OnCreate0 函 数 中 创建 CTooldlg 类 对 象 dg， 并 且 将 该 对 象 添 
加 到 工具 栏 中 。 在 这 里 ， 用 户 需要 用 到 MFC 中 的 CReBar 类 ， 该 类 相当 于 一 个 容器 ， 可 以 
将 多 个 控件 组 合 在 一 起 。 代 码 如 下 : 


int CMainFrame: :OnCreate (LPCREATESTRUCT lpCreatestruct) 


{ 
i // 省 略 部 分 代码 
if (dlg.m hWnd==NULL) // 判 断 CToold1g 类 对 象 是 否 已 经 存在 
{ 
dlg.Create (ID DILOG, this); // 创 建 CToold1g 类 实例 ， 并 且 与 对 话 框 
ID DILOG 进行 关联 
m wndReBar.AddBar (&d1g); // 将 实例 对 象 dlg 添加 到 容器 中 
} 
return 0; 
| 


通过 上 述 代码 ,用户 已 经 将 带 有 地 址 栏 的 对 话 框 IJD_DILOG 添加 到 工具 栏 中 ， 效 果 如 


MB。 
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图 5.5 所 示 。 


图 5.5 添加 地 址 栏 后 的 效果 


用 户 使 用 程序 浏览 网 页 时 ， 在 地 址 栏 中 输入 网 址 ， 然 后 单 击 “ 连 接 ” 按 钮 即 可 浏览 相 
应 的 网 页 内 容 。 注 意 : 在 本 章 中 ， 如 果 没 有 实现 相关 按钮 的 消息 响应 函数 ， 那 么 响应 函数 
将 在 5.3.2 节 中 进行 实现 。 


3. 添加 工具 栏 按钮 


当 制 作 网 页 浏览 器 时 ， 用 户 还 需要 添加 一 些 功能 。 例 如 ， 刷 新 、 上 一 步 、 下 一 步 和 浏 
览 记录 等 。 这 些 操 作 在 VC 中 实现 非常 简单 。 

首先 ， 在 资源 管理 器 中 展开 Toolbar 项 ,添加 4 个 工具 栏 按钮 ， 如 图 5.6 所 示 。 各 按钮 
的 ID 分 别 为 ID_VIEWRECORD、ID PRE、ID NEXT、ID_ REFRUSH， 分 别 表示 浏览 记 
录 、 上 一 步 、 下 一 步 和 刷新 。 


HI 了 DLL 了 icrosoft Visual C++ [HTILI. rc IDR_WAINFRANE (Bitmap)] 
大 文件 四 编辑 E) 查看 Y) 折 入 CX) 工程 CD) 组 建 @) 图 佛 Q 工具 (0) 窗口 帮助 人 0 =l5|x 
BIEA-L TE) el 
Js lossmembera] oon 可 必 *|| 雪 况 吧 罗 光 
一 王 一 = jy 一 一 寺 
rm eos | | Lalslelsisir| | | | | OZ 


由 国 "REGISTRY" FT OD 

9 Accelerator be 多 

由 国 Dialog ee 总 5 

昌国 Icon 时 

局 外 Menu 中 [mu 
昌 IDR_MAINFRA| 呈 3 夫 口 国 四 

由 国 String Table 


Ip: 
了 宽度 [Dj: |16 高 度 [): |15 
提示 M:| 


WON Se Se ee rr 


| CH 


图 5.6 添加 工具 栏 按钮 
然后 ， 编 译 执行 该 程序 ， 程 序 效果 如 图 5.7 所 示 。 


"Me 


具 栏 


5.3. 


应 函 
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第 五 章 : 网 页 浏览 器 示例 程序 


文件 于 ) 编辑 于 ) 网 址 收藏 赤 ”查看 源 文件 


SE 35T 


产品 信息 。 MSDN 详 估 中心 网络 广播， MSDN 杂 卜 。 MSDN 可 网 


Visual C++ 入 门 
1. 关 于 Visual C++ 


Visual C+ + 技术 资源 库 特色 内 容 
Visual c++ MSDN 技术 资源 库 的 重要 更 新 
| visual c++ 和 A 


大 visual c++ "我 如 何 ?" 入 门 
视频 (英文 ) 


当前 正在 处 理 此 源 No Title， 请 稍 候 再 回来 查看 . 


更 多 Visual C++ 技术 资源 库 内 容 … 


2. 获得 Visual C++ 


MR : visual c++ 2008 
Express 


志 visual sudio zo08: 9o 斌 
用 版 


下 载 
Visual C++ 2008 Feature Pack 
也 包含 了 TR1 的 实现 。 


5.7 程序 运行 效果 


用 户 会 发 现在 运 
中 添加 了 按钮 ， 


: 行 的 程序 中 ， 
并 没有 为 其 添加 相应 的 消息 响应 函数 。 


2 添加 消息 响应 


在 5.3.1 节 中 ， 用 户 添 加 了 工具 栏 按 钮 和 地 址 栏 等 控件 ， 但 是 
数 。 本 节 将 讲述 添加 消息 响应 函数 以 及 各 按钮 功能 的 具体 实 
首先 ， 添 


框 ， 如 图 5.8 所 示 。 


刚 添加 的 工具 栏 按钮 是 灰色 的 。i 


Visual C++ 2008 Feature Pack 包含 了 MFC 一 些 重要 的 更 新 ， 同 时 


这 是 因为 用 户 只 是 


Visual C 


靖 选 技术 
技术 文章 。 


10-4 Epi 
Visual S! 
This epist 
editor in' 


Security 
Templat 
Read abo 
recently + 
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» 


数字 


是 在 工 


:并 没有 为 其 添加 消息 响 


现 方法 。 


Mes: aps | Member Variables | Automation | Activex Events | Class Info | 
Broject: Add Clase... 
HTMLT es 
Ex 第 五 章 HTML1WMainFrm.h, EMainFrm.cpp 
Object IDs: Messages: 
ID_NEXT a 
ID_NEXT_PANE UPDATE_COMMAND_UI Edn Code 
ID_PRE 
ID-PREV_PANE 
ID_REFRUSH 
ID_VIEWMENU 
Member functions: 
W OnAddnetaddres ON_ID_ADDNETADDRES:COMMAND 
W oncreate ON_WM_CREATE 
W OnSelchangeCom ON_IDC_COM:CBN_SELCHANGE 
W Onyiewmenu ON_ID_VIEWMENU:COMMAND 
¥ PreCreateWindow 
Description: 。 Handle a command [from menu, accel cmd button] 
取消 


加 “连接 ”按钮 的 消息 响应 函数 。 在 VC 主 界面 中 ， 按 下 Ctrl+W 快捷 键 ， 弹 
出 MFC 向 导 对 话 


Si 


5.8 ”MFC 向 导 对 话 框 
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用 户 在 Message Maps 选项 卡 中 找到 连接 按钮 的 JP， 然后 为 其 添加 鼠标 单 击 消息 响应 
函数 OnButton0， 然 后 单 击 “确定 ”按钮 完成 函数 添加 《其 他 工具 栏 按钮 添加 响应 函数 的 
方法 与 此 相同 ) 。 函 数 代 码 如 下 : 


void CMainFrame::OnButton () 
下 


CString strs // 定 义 字符 串 变 量 

GetDlgItem(IDC COMBO1) ->GetWindowText (str); // 获 得 地 址 栏 输入 的 字符 串 

m view.getpage (str); // 调 用 视图 类 自 定义 函数 getpage () 打开 网 页 
// 省 略 部 分 代码 


上 述 代码 中 ，m_view.getpage(str) 表 示 调 用 视图 类 中 的 自 定义 函数 打开 指定 网 页 。 用 户 
要 使 用 该 函数 ， 必 须 在 视图 类 中 进行 定义 。 首 先 ， 在 CHTML1View 类 的 头 文件 
“HTML1View.h” 中 ， 定 义 函 数 getpage(0， 参 数 类 型 为 CString 类 型 。 代 码 如 下 : 


class CHTML1View : public CHtmlView // 视 图 类 定义 
本 


os // 省 略 部 分 代码 
Protected: 
CHTML1View () 7 // 构 造 函 数 
public: 
CHTML1Doc* GetDocument (); 
public: 
void getpage (CString str); // 自 定义 函数 getpage () 
Virtual ~CHTML1View() 7 
// 省 略 部 分 代码 


J 

然后 在 视图 类 的 定义 中 ， 实 现 自 定义 函数 。 实 现代 码 如 下 : 

void CHTML1View: :getpage (CString str) 

. 

Navigate2 (str, NULL, NULL); // 调 用 CHtmlView 类 的 函数 打开 网 页 

} 

函数 Navigate20 是 CHtmlView 类 成 员 函 数 ， 用 于 打开 指定 网 络 地 址 的 网 页 。 其 原型 
如 下 : 

void Navigate2( LPCTSTR lpszURL, DWORD dwFlags = 0, LPCTSTR 

lpszTargetFrameName = NULL, LPCTSTR lpszHeaders = NULL, LPVOID 

lpvPostData= NULL, DWORD dwPostDataLen = 0 ); 

参数 lpszURL 表示 网 页 的 网 络 地 址 ， 其 他 参数 均 默 认为 NULL。 在 视图 类 中 自 定义 函 
数 成 功 之 后 ， 将 视图 类 对 象 设置 为 框架 类 CMainFrame 的 成 员 变量 。 方 法 如 下 : 

#include <HTML1View.h> // 包 含 视图 类 头 文件 


class CMainFrame : public CFrameWnd 


protected: 
CMainFrame (); 
DECLARE DYNCREATE (CMainFrame) 
public: 
CHTML1View m view; // 定 义 视图 类 对 象 
} 


通过 上 述 代 码 ， 用 户 可 以 在 工程 框架 类 中 调用 视图 类 对 象 的 成 员 函 数 了 。 


-ls 
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当 用 户 每 次 输入 网 页 地 址 后 ， 程 序 需 要 将 该 地 址 存 入 .URL 文件 中 ， 以 便 用 户 查 看 浏 
览 记 录 和 向 下 拉 列 表 框 中 添加 已 浏览 网 页 的 网 络 地 址 。 所 以 需要 在 连接 按钮 的 响应 函数 中 
添加 代码 ， 代 码 如 下 : 


void CMainFrame::OnButton() 
{ 


Cstring str; // 定 义 字符 串 变量 
GetD1gItem(IDC_COMBO1) ->GetWindowText (str) ; // 获 得 地 址 栏 输入 的 字符 串 
m view.getpage (str); // 调 用 自 定义 函数 getpage 打开 网 页 


CFile file("recode.URL"，CFile::modeCreate1CFile::modeReadWrite) ; 
// 创 建文 件 ， 并 指定 可 读 可 写 属性 

Str+="\r\n"; // 添 加 换行 符 

for (int i=0;i<=str.GetLength();i++) // 循 环 写 入 str 内 容 

. 


char buff=str.GetAt (i); // 字 符 指针 指向 str 
file.Write (gbuff,1); // 将 网 页 地 址 写 入 文件 中 
file.Close(); // 关 闭 文件 

i 


程序 在 启动 时 , 还 应 该 从 recode.URL 文件 中 读 取 浏览 过 的 网 址 ,并 添加 到 地 址 栏 的 下 
拉 列 表 框 中 ， 供 用 户 查 看 。 该 功能 在 函数 CMainFrame::OnCreate0 中 实现 ， 因 为 该 函数 是 
程序 启动 后 第 一 个 调用 的 函数 。 代 码 如 下 : 


int CMainFrame: :OnCreate (LPCREATESTRUCT lpCreatestruct) 


有 // 省 略 部 分 代码 
CFile file("recode.URL", CFile::modeReadWrite); / /创建 文件 

char buff[100]={0}; // 定 义 缓冲 区 

file.Read (buff, 100); // 读 取 文 件 

while (buff!="\r"ggbuff!="\n") // 判 断 地 址 是 否 结束 


{ 
GetD1gItem(IDC_COMBO1) ->Addstring (CString &buff);  // 向 地 址 栏 添加 网 址 


file.Read (buff,100); // 继 续 读 取 文 件 内 容 
} 
} 


如 果 用 户 从 下 拉 列 表 框 中 选择 浏览 网 址 ， 则 程序 还 需要 响应 组 合 框 的 CBN_ 
SELCHANGE 消息 。 该 响应 函数 定义 如 下 : 

void CMainFrame: :OnSselchangeCom() 

{ 

Cstring str; // 定 义 字符 串 变 量 

int i=GetDlgItem(IDC COMBO1)->GetCursel (); // 获 得 用 户 单 击 下 拉 列 表 框 的 索引 

GetD1gItem(IDC_COMBO1) ->GetLBText (1, str) ; // 获 取 索 引 处 内 容 
GetD1gItem (IDC COMBO1) ->SetWindowText (str); 


// 将 获得 的 网 址 设置 为 组 合 框 中 的 内 容 
| 


程序 将 用 户 单 击 处 的 网 址 设置 为 组 合 框 的 内 容 后 ， 单 击 “ 连 接 ” 按 钮 ， 调 用 
CMainFrame::OnMybutton() 函 数 。 现 在 ， 程 序 已 经 实现 了 浏览 网 页 和 保存 查看 浏览 记录 等 
功能 。 关 于 上 一 步 、 下 一 步 和 刷新 等 功能 的 实现 非常 简单 ， 消 息 响应 函数 的 创建 与 连接 按 
钮 的 响应 函数 创建 方法 一 样 ， 这 里 不 再 更 述 。 功 能 代码 如 下 : 


瑟 / 和 区 


void CMainFrame::OnNext () // 下 一 步 按钮 消息 响应 函数 
{ 
m view. GoForward(); // 调 用 CHtmlView 类 的 成 员 函 数 
} 
void CMainFrame::OnPre() // 上 一 步 按钮 消息 响应 函数 
国 
m view。 GoBack(); // 调 用 CHtmlView 类 的 成 员 函 数 
void CMainFrame::OnRefrush() // 刷 新 按钮 消息 响应 
. 
m view. Refresh(); // 调 用 cHtmlView 类 的 成 员 函 数 
} 
void CMainFrame::OnViewrecord() // 浏 览 记 录 按 钮 响应 函数 
CFile file("recode.URL", CFile::modeReadWrite); 
// 创 建 并 打开 文件 

char buff[100]={0}; // 定 义 缓冲 区 
file.Read (buff,100); // 读 取 文 件 
char *i=&buff; // 声 明 指针 对 象 指向 数据 的 首 地 址 
CString str; // 字 符 串 对 象 变量 
while (i!=NULL) // 判 断 指针 是 否 为 空 

if(i!="\r"ggi!l="\n") // 判 断 字符 是 否 为 结束 符 
{ 

str+=(CString)i; // 若 不 是 ， 则 转换 为 字符 串 
i+=17 // 将 指针 指向 下 一 个 数据 
else // 若 是 ， 则 表明 已 经 读 出 一 条 网 址 
下 
file.Read (buff,100) 7 // 重 新 读 取 文件 

i=gbuff; // 重 新 定义 指针 


GetDlgItem(IDC COMBO1) ->Addstring (str); // 向 地 址 栏 添加 网 址 

} 

3 

在 “浏览 记录 ”按钮 的 响应 函数 OnViewrecord0 中 ， 采 用 了 循环 读 取 文 件数 据 ， 并 判 
断 数据 是 否 结束 ， 以 便 用 户 判断 一 条 记录 的 完整 性 。 如 果 得 到 一 条 完整 数据 ， 则 加 入 到 地 
址 栏 中 显示 ， 否 则 将 继续 循环 直到 数据 结束 。 到 此 ， 工 具 栏 上 各 个 按钮 的 消息 响应 函数 均 
以 实现 ， 用 户 可 以 参照 本 书 所 带 光 盘 中 的 代码 进行 学 习 、 调 试 ， 对 读者 的 学 习 会 有 很 大 的 
帮助 。 


5.3.3 ”如 何 实现 收藏 夹 的 功能 


当 用 户 上 网 时 ， 如 果 感 觉 某 个 网 页 的 内 容 很 吸引 人 或 者 具有 参考 价值 ， 而 用 户 又 不 愿 
意 记 下 那些 元 长 难 记 的 网 址 。 这 时 ， 用 户 就 可 以 使 用 浏览 器 上 的 收藏 夹 来 对 该 网 址 进行 标 
记 ， 以 方便 下 次 继续 浏览 该 网 页 。 在 本 节 中 ， 将 向 用 户 介 绍 怎样 实现 收藏 夹 的 功能 。 


1. 添加 菜单 和 按钮 


首先 ， 在 资源 管理 器 的 菜单 栏 中 添加 一 个 菜单 项 ， 名 称 是 “网 址 收藏 夹 ”， 属 性 设置 
为 弹出 菜单 ， 其 他 为 默认 ， 如 图 5.9 所 示 。 


JE 
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图 5.9 添加 弹出 菜单 


然后 ， 在 工具 栏 中 添加 一 个 按钮 ， 名 称 设置 为 T， 了 DD 为 ID _ ADDNETADDRES， 意 思 
是 添加 网 址 到 收藏 夹 ， 如 图 5.10 所 示 。 
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图 5.10 添加 工具 栏 按钮 


工具 栏 中 所 添加 的 按钮 可 以 将 用 户 感 兴趣 的 网 址 添加 到 “网 址 收藏 夹 ” 菜 单 下 。 当 用 
户 需 要 浏览 这 些 网 站 时 ， 打 开 “ 网 址 收藏 夹 ”菜单 选择 相应 网 站 即 可 浏览 。 


2. 添加 消息 响应 函数 


在 VC 中 ， 添 加 工具 栏 按钮 T 的 消息 响应 函数 方法 与 5.3.2 节 中 所 讲述 的 方法 一 样 。 
如 果 读 者 对 添加 响应 函数 的 方法 不 清楚 ， 请 重新 复习 5.3.2 节 中 的 知识 。 按 钮 T 的 消息 响 


.114。 


应 函数 定义 如 下 : 
int i=0; // 定 义 全 局 变量 i 


void CMainFrame::OnAddnetaddres () 
{ 
i=: :GetMenuItemCount ( 
: :GetSubMenu ( (HMENU) : :GetD1gItem (this->m hWnd,IDR MAINFRAME),3); 


// 获 取 当 前 菜单 总 项 数 
CString addstr; // 定 义 字 符 串 
this->GetDlgItem(IDC COMBO1) ->GetWindowText (addstr); // 获 取 地 址 栏 内 的 网 址 
CMenu *menu; // 定 义 菜单 指针 对 象 


menu= (CMenu 
*) : :GetSubMenu ( (HMENU) : :GetDlgItem (this->m hWnd,IDR MAINFRAME),3); 


// 获 取 菜单 栏 的 指针 
menu->AppendMenu (ME _ STRING, i++, addstr); // 向 菜单 栏 添加 网 址 
} 


以 上 代码 ， 通 过 CMenu 类 的 函数 AppendMenu0 向 收藏 夹 菜 单 下 添加 一 个 菜单 ， 菜 单 
所 显示 的 文字 是 用 户 收 藏 的 网 址 。 


外 注意 : 在 程序 中 使 用 了 符号 “::”， 表 示 调 用 的 函数 是 Win32 API 全 局 函数 。 


用 户 将 网 址 添加 到 收藏 夹 以 后 ， 便 可 以 直接 单 击 菜单 中 的 网 址 进行 浏览 。 用 户 单 击 菜 
单 的 消息 响应 函数 是 本 节 的 重点 。 

首先 ， 在 CMainFrame 类 的 头 文件 MainFrm.h 中 定义 一 个 弹出 菜单 的 消息 响应 函数 。 
代码 如 下 : 


afx msg void OnMenuClick(int nID) 7 // 定 义 响应 函数 


然后 ， 在 消息 映射 里 添加 菜单 命令 消息 宏 ON_COMMAND _RANGE。 代 码 如 下 : 


BEGIN MESSAGE MAP (CMainFrame, CFrameWnd) 
//{{AFX MSG MAP (CMainFrame) 

ON WM CRERTE () 

ON_COMMAND (ID NEXT, OnNext) 

ON COMMAND(ID PRE, OnPpre) 

ON_COMMAND (ID REFRUSH, OnRefrush) 
ON_COMMAND (ID VIEWRECORD, OnViewrecord) 

ON BN CLICKED(IDC BUTTON, OnButton) 
ON_CBN_SELCHANGE (IDC_COM, OnSelchangeCom) 
ON COMMAND(ID ADDNETADDRES, OnAddnetaddres) 
ON_COMMAND RANGE (1,i,OnMenuClick) // 菜 单 消息 命令 宏 
//}}AFX MSG MRP 

END MESSAGE MRP () 


消息 宏 ON_COMMAND RANGE 的 作用 是 当 用 户 操作 一 个 ID 范围 内 的 菜单 时 , 调用 
同一 个 消息 响应 函数 进行 处 理 。 该 函数 的 参数 表示 当前 被 用 户 单 击 菜单 的 ID 号 ， 函 数 
GetMenuString0 通 过 ID 号 可 以 获取 该 菜单 上 的 文字 。 如 果 获 取 成 功 ， 则 调用 CHtmlView 
类 的 函数 Navigate20 浏 览 网 页 。 有 具体 代码 如 下 : 

void CMainFrame::OnMenuClick(int nID) 

{ 


menu.GetMenuString (nID, menustr, MF BYCOMMAND ); // 获 取 浏览 网 址 
(CHTML1View*) GetRctiveView()->Navigate2 (menustr,NULL,NULL); 


于 和 和 
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// 调 用 函数 浏览 网 页 

上 述 代码 实现 了 网 址 收藏 夹 的 功能 ， 用 户 可 以 根据 代码 扩展 其 功能 。 例 如 ， 将 网 址 写 
入 文件 保存 在 工作 目录 下 ， 待 程序 启动 时 读 取 文 件 中 数据 。 这 样 ， 用 户 保存 的 数据 不 易 丢 
失 ， 即 使 程序 发 生 异常 ， 用 户 也 可 以 从 目录 下 直接 打开 文件 查看 。 

本 节 主 要 讲述 了 制作 网 络 浏览 器 界面 和 各 功能 函数 的 具体 实现 。 用 户 也 可 以 自行 添加 
代码 达到 自 定 义 效果 。 


5.4 使 用 Microsoft Web 浏览 器 控件 


在 MFC 中 ， 用 户 可 以 使 用 COM (组 件 对 象 ) 对 象 来 实现 网 络 浏览 器 。 使 用 COM 
进行 编程 ， 不 但 方便 用 户 缩短 开发 周期 ， 还 可 以 使 用 户 进一步 加 深 理解 面向 对 象 编程 的 
意义 。 


5.4.1 建立 MFC 工程 


在 VC 中 ,创建 网 页 浏览 器 的 基本 步骤 与 创建 FTP 工程 的 步骤 大 体 相同 ， 下 面 将 向 用 
户 讲解 与 其 不 同 的 创建 步骤 与 设置 。 
(1) 将 工程 类 型 设置 为 单 文档 ， 如 图 5.11 所 示 。 


您 要 创建 的 应 用 程序 类 型 是 : 


5 亩 有 
个 多 重文 档 多 
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习 文档 查看 体系 结构 支持 四 


您 的 资源 使 用 的 语言 是 : 
中 文员 国 ] APPWZCHS.DLU 了 | 
| 
| 


1 
图 5.11 设置 工程 类 型 


(2) 单 击 “ 下 一 步 ” 按 钮 到 步骤 4, 将 程序 的 工具 栏 样式 设置 为 “类 似 正 ”， 如 图 5.12 
所 示 。 
(3) 工具 栏 样式 设置 完成 以 后 ， 单 击 “ 下 一 步 ” 按 钮 进入 最 后 一 步 ， 如 图 5.13 所 示 。 
单 击 “ 完 成 ”按钮 , 完成 工程 的 设置 , 编译 器 自动 回 到 VC 主 界面 中 , 并 添加 “MicroSoft 
Web 浏览 器 ”组 件 。 


“Ge 
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图 5.12 设置 工程 工具 栏 样式 


FC 应 用 程序 向 导 - 步 村 6 共 6 步 
应 用 程序 向 导 为 您 创建 了 以 下 类 : 
CMy12App 


CMainFrame 
CMy12Doc 


5.13 ”完成 设置 


5.4.2 添加 控件 


一 般 情况 下 ， 用 户 在 VC 中 可 以 利用 菜单 向 工程 添加 控件 。 如 果 该 控件 没有 在 程序 所 
运行 的 系统 中 进行 注册 ,那么 需要 用 户 利用 相关 工具 、 代 码 或 者 Windows 命令 进行 注册 控 
件 。 控 件 添加 成 功 ， 还 需要 为 该 控件 生成 相应 的 类 。 具 体 方法 将 在 本 节 中 讲述 。 


1. 添加 COM 组 件 


(1) 通过 选择 “工程 ”|“ 增 加 到 工程 ”命令 添加 COM 对 象 ， 如 图 5.14 所 示 。 
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soft Yisual C++ — [HINLI.rc 一 IDR NAINFRAWE (Bitmap)] 


男 文 件 四 编辑 到) 查看 如 括 入 QD) [Taw 组 建 @) 图 祭 昌 工具 QD) 窗口 思 帮助 如 


| 前 蕊 加 和 外 yx 电 岛 二 - 


AboutDIg [Al cla 


已 于 HTMLI resources 


3 国 "REGISTRY” 
+ 回 Accelerator 
5 Dialog 

二 国 Icon 

= Menu 


3 国 String Table 
5 Toolbar 


# Version 


昌 IDR_MAINFRA 


型 [IDR_MAINFRA 


看 西 - 


5.14 添加 COM 组 件 对 象 


(2) 选择 Components and Controls Gallery 命令 以 后 ， 会 弹出 插入 组 件 对 话 框 ， 如 图 


5.15 所 示 。 


(3) 双击 
个 询问 对 话 框 ， 


图 5.16 所 示 。 


Components and Controls Gallery 


选择 要 插入 到 工程 的 组 件 
查找 范 图 DD: [已 cu -| 人 + 向 条 国 - 


heeistered Metiveg Controls 
BVise ch Conponents 


图 5.15 插入 组 件 对 话 框 


第 一 个 文件 夹 ， 找 到 Microsoft Web Browser 组 件 并 单 击 Insert 按钮 弹出 一 
直接 单 击 “ 确 定 ” 按 钮 。 这 样 ， 用 户 就 可 以 将 Web 组 件 插入 到 工程 中 ， 如 


(4) 将 Web 组 件 添加 到 工程 中 ,需要 用 户 为 该 组 件 生成 一 个 相应 的 类 。 在 弹出 的 配置 


类 对 话 框 中 ， 


用 户 可 以 修改 组 件 类 的 名 称 、 头 文件 名 等 。 在 本 工程 中 ， 使 用 默认 的 类 名 


CWebBrowser2 以 及 文件 名 webbrowser2.h， 如 图 5.17 所 示 。 


:二 
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Components and Controls Gallery 


选择 要 插入 到 工程 的 组 件 
查找 区 图 0 [加 Beastered Ketiver contras | 委 图 全 国 - 


Hicrosoft Visual CH+ 属 


企 Insert this component? 
Ee _™ | 


图 5.16 插入 Web 组件 到 工程 


The checked lossles) will be generated fom [ok | 
‘the ActiveX Control. Click on a class name to 


browse or edit its attributes. a 


The selected 
class has already| 
been generated. 
Click OK to 
update the class. 


Class name: Base class: 
CWebBrowser? Cwnd 


Header file: 


webbrowser2.h 


Implementation file: 


webbrowser2.cpp 


图 5.17 配置 类 对 话 框 


用 户 将 新 建 类 的 信息 修改 完毕 以 后 ， 单 击 OK 按钮 ， 返 回 到 VC 主 界面 ， 可 以 在 界面 
左 侧 的 ClassView 中 查看 新 添加 类 的 声明 和 定义 。 


外 注意 : 如 果 用 户 添加 的 COM 组 件 没有 在 系统 中 注册 ， 则 需要 用 户 通 过 相关 工具 或 者 代 
码 注册 组 件 ， 关 于 此 方面 的 内 容 请 读者 参考 有 关 动 态 链接 库 的 书籍 。 
2. 创建 CWebBrowser2 对 象 


如 果 用 户 插入 Web 组 件 成 功 , 那么 必须 创建 组 件 类 对 象 , 再 利用 该 对 象 调用 相应 的 方 
法 实现 网 页 浏览 功能 。 
(1) 在 头 文件 MainFrm.h 中 包含 Web 组 件 类 的 头 文件 webbrowser2.h。 代 码 如 下 : 


wr 
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#include "webbrowser2.h" // 包 含 组 件 类 的 头 文件 
class CMainFrame : public CFrameWnd 
和 
// 省 略 部 分 代码 
| // 类 定义 完成 


(2) 然后 ， 在 CMainFrame 类 的 定义 中 声明 组 件 类 对 象 ， 访 问 权 限 设置 为 protected。 
代码 如 下 : 


class CMainFrame : public CFrameWnd // 定 义 CMainFrame 类 , 继承 于 CFrameWnd 
{ 


protected: // 保 护 属性 
CWebBrowser2 web; // 组 件 类 对 象 
// 省 略 部 分 代码 


本 

创建 CWebBrowser2 对 象 时 , 还 可 以 在 该 类 的 构造 函数 中 利用 new 关键 字 创建 其 对 象 。 
j 户 将 以 上 步骤 操作 完成 以 后 ， 就 可 以 在 程序 中 使 用 CWebBrowser2 类 方法 实现 网 页 浏览 
功能 。 


5.4.3 ”控件 对 象 属性 方法 


在 程序 中 实现 浏览 网 页 等 功能 是 通过 CWebBrowser2 类 的 方法 实现 的 。 在 该 类 中 ， 打 
开 指 定 网 页 可 以 使 用 函数 CWebBrowser2::Navigate20。 在 “连接 ”按钮 的 消息 响应 函数 中 
使 用 该 函数 浏览 网 页 ， 代 码 如 下 : 


void CMainFrame::OnButton() // 连 接 按钮 响应 函数 
Cstring str; // 定 义 字符 串 变量 
GetD1gItem (IDC_COMBO1) ->GetWindowText (str) 7 // 获 得 地 址 栏 输入 的 字符 串 
web.Navigate2 (str, NULL, NULL); // 调 用 CWebBrowser2 类 函数 打开 网 页 


CFile file("recode.URL", CFile::modeCreate|lCFile::modeReadWrite); 
// 创 建文 件 ， 并 指定 可 读 可 写 属性 


Str+="\r\n"; // 添 加 换行 符 

for (int i=0;i<=str.GetLength();i++) // 循 环 写 入 str 内 容 
char buff=str.GetAt (i); // 字 符 指针 指向 str 
file.Write (gbuff,1); // 将 网 页 地 址 写 入 文件 中 
file.Close(); // 关 闭 文件 

} 


在 代码 中 , 使 用 函数 CWebBrowser2 类 的 Navigate20 打 开 指 定 网 页 , 其 参数 str 表示 网 
页 的 浏览 地 址 ， 其余 参 数 默认 为 NULL。 程序 将 用 户 输入 的 网 址 保存 到 recode.URL 文件 中 
供用 户 查看 浏览 记录 。 接 下 来 ， 将 向 用 户 介绍 CWebBrowser2 类 的 一 些 常用 方法 。 


Void CWebBrowser2:: GoHome(); // 返 回 主页 
Void CWebBrowser2::GoForward(); // 页 面前 进 
Void CWebBrowser2::GoBack(); // 页 面 返 回 
Void CWebBrowser2::Refresh(); // 页 面 刷新 
Void CWebBrowser2::Stop(); // 页 面 停止 


如 果 用 户 想 要 刷新 页 面 ， 则 在 工具 栏 “ 刷 新 ”按钮 的 消息 响应 函数 中 ， 使 用 
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CWebBrowser2 类 对 象 web 调用 Refresh0 函 数 对 页 面 进行 刷新 。 代 码 如 下 : 


void CMainFrame::OnRefrush () // 刷 新 按钮 消息 响应 函数 

{ 

web. Refresh(); // 调 用 CWebBrowser2 类 刷新 方法 刷新 页 面 
} 


关于 网 页 浏览 器 中 各 个 功能 的 实现 与 CWebBrowser2 类 的 各 个 函数 方法 的 作用 相同 ， 
如 上 面 的 代码 所 示 。 实 现 浏览 器 中 其 他 各 功能 ， 代 码 如 下 : 


void CMainFrame::OnNext () // 前 进 按钮 消息 响应 函数 
web.GoForward (); // 调 用 CWebBrowser2 类 的 成 员 函 数 
J CMainFrame: :OnPpre () // 后 退 按钮 消息 响应 函数 
web.Stop () 7 // 调 用 CWebBrowser2 类 的 成 员 函 数 
人 CMainFrame::OnStop () // 停 止 按钮 消息 响应 函数 
web.GoBack () // 调 用 CWebBrowser2 类 的 成 员 函 数 
ys CMainFrame: :OnHome () // 主 页 按钮 消息 响应 函数 
. Web.GoHome (); // 调 用 CWebBrowser2 类 的 成 员 函 数 


} 


用 户 使 用 COM 组 件 对 象 进行 编程 ， 可 以 实现 程序 中 一 些 复杂 的 功能 或 者 界面 。 在 本 
节 中 ， 向 用 户 介 绍 了 在 工程 中 使 用 Microsoft Web 浏览 器 控件 访问 网 页 时 ， 需 要 用 到 的 控 
件 类 属性 与 方法 ， 并 且 举 例 说 明了 一 些 较 常用 的 CWebBrowser2 类 函数 。 关 于 该 类 的 其 他 
功能 函数 ， 用 户 可 以 参考 MSDN。 


5.5 CHtmlView 类 


在 本 章 前 几 节 中 ， 已 经 向 用 户 介绍 了 实现 网 页 浏览 器 的 几 种 方法 。 在 MFC 中 ， 用 户 
还 可 以 使 用 CHtmlView 类 进行 编程 。CHtmlView 类 是 用 来 显示 网 页 数据 的 视图 类 ， 如 果 
用 户 在 工程 中 将 默认 的 视图 类 继承 于 该 类 ， 那 么 便 可 以 拥有 显示 网 页 内 容 的 功能 。 


5.5.1 CHtmlView 类 


CHtmlView 类 在 MFC 中 是 专门 用 来 显示 网 页 的 视图 类 。 通 常情 况 下 ， 用 户 只 需 将 该 
类 作为 视图 类 的 父 类 ， 便 可 以 调用 其 类 中 的 函数 方法 进行 网 页 的 显示 以 及 刷新 等 功能 。 下 
面 ， 将 向 用 户 介绍 该 类 中 部 分 函数 的 作用 以 及 使 用 方法 。 

如 果 用 户 在 工程 中 需要 实现 连接 并 打开 网 页 ， 那 么 调用 该 类 中 的 函数 Navigate20， 便 
可 以 实现 这 个 功能 。 其 原型 如 下 : 


void Navigate2( LPCTSTR lpszURL, DWORD dwFlags = 0, LPCTSTR 
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lpszTargetFrameName = NULL, LPCTSTR lpszHeaders = NULL, LPVOID 
lpvPostData = NULL, DWORD dwPostDataLen = 0 ); 


该 函数 的 作用 是 连接 并 打开 指定 网 页 。 其 中 ， 参 数 lpszURL 为 将 要 打开 的 网 页 地 址 ， 


其 他 参数 均 为 NULL .例如 ,用 户 需 要 打开 地 址 为 :www.163.com ”的 网 页 , 则 将 参数 lpszURL 
设置 为 该 地 址 即 可 。 代 码 如 下 : 


容 。 


CHTMLJIView:: Navigate2 ("www.163.com",0,NULL, NULL, NULL,0); 


上 面 的 代码 运行 之 后 ， 将 在 工程 视图 中 打开 并 显示 地 址 为 “www.163.com” 的 网 页 内 
当 用 户 浏览 网 页 时 ， 可 以 使 用 该 类 中 提供 的 刷新 功能 获取 更 新 后 的 当前 网 页 内 容 ， 也 


可 以 在 工程 中 查看 已 经 浏览 过 的 网 页 等 。 代 码 如 下 : 


void CHTML1View::OnRefrush () // 刷 新 网 页 内 容 


void CHTML1View: :OnPre () // 查 看 上 一 步 浏览 的 网 页 
{ 


this->GoBack(); 

} 

void CHTML1View: :OnNext () // 查 看 下 一 步 
{ 


} 
在 本 章 的 实例 程序 中 ， 主 要 使 用 以 上 函数 实现 网 页 的 浏览 等 功能 。 如 果 用 户 需要 了 解 


this->Refresh(); 


this->GoForward(); 


关于 该 类 的 其 他 知识 ， 请 查阅 MSDN 或 参考 书籍 。 本 章 不 再 对 该 类 进行 详细 讲解 。 


5.5. 


2 ”建立 继承 关系 


一 般 情况 下 ， 用 户 在 生成 工程 项 目 时 ， 通 过 应 用 程序 向 导 将 程序 视图 类 的 父 类 设置 为 


CHtmlView 类 ， 其 余 步骤 均 与 5.3 节 中 相同 ， 如 图 5.18 所 示 。 


应 用 程序 向 导 为 您 创建 了 以 下 类 : 


图 5.18 设置 工程 视图 基 类 


ss 
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用 户 除 了 通过 应 用 程序 向 导 修 改 基 类 外 ， 也 可 以 通过 手工 修改 代码 完成 。 首 先 ， 在 头 
文件 HIML1View.h 中 手工 将 CHTML1View 类 的 父 类 修改 为 CHtmlView。 代 码 如 下 : 


class CHTML1View : public CHtmlView // 将 视图 类 的 父 类 修改 为 CHtmlView 
SR // 省 略 部 分 代码 
} 
然后 ， 在 文件 HTML1View.cpp 中 将 动态 创建 宏和 消息 映射 宏 中 的 父 类 名 修改 为 
CHtmlView 类 。 代 码 如 下 : 
IMPLEMENT DYNCREATE (CHTML1View, CHtmlView) // 动 态 创建 宏 
BEGIN MESSAGE MAP (CHTML1View, CHtmlView) // 消 息 映射 宏 
//{{AFX MSG MAP (CHTML1View) 
//}}AFX MSG MAP 
// Standard printing commands 
ON COMMAND (ID FILE PRINT, CHtmlView::OnFilePrint) 
END MESSAGE MAP() 
通过 以 上 两 种 方法 可 以 修改 工程 中 视图 类 和 CHtmlView 类 的 继承 关系 , 并 且 视 图 类 继 
承 了 CHtmlView 类 中 的 一 些 功能 函数 。 


5.5.3 ”地 址 栏 消息 响应 


在 工程 界面 中 ， 对 于 地 址 栏 的 消息 响应 是 浏览 器 中 非常 重要 的 。 用 户 在 地 址 栏 中 输入 
网 址 ， 单 击 “连接 ”按钮 后 ， 程 序 打开 指定 网 页 内 容 。CHtmlView 类 中 的 函数 Navigate20 
可 以 显示 网 页 。 代 码 如 下 : 

void CHTML1View: :OnButton() 

下 

CString str; // 定 义 字符 串 变量 

GetD1gItem (IDC_COMBO1) ->GetWindowText (str) 7 // 获 得 地 址 栏 输入 的 字符 串 

this-> Navigate2 ("www.163.com",0,NULL, NULL, NULL,0); 

// 调 用 视图 类 函数 Navigate2 () 显示 网 页 
站 7/ 省略 部 分 代码 

} 

在 代码 中 ， 程 序 利用 this 指针 调用 函数 Navigate20 显 示 网 页 内 容 。 关 于 其 他 消息 响应 
函数 与 5.2 节 中 相同 ， 所 以 本 节 不 再 进行 讲解 。 请 读者 复习 前 面 的 相关 内 容 。 


5.5.4 ”实现 查看 源 文件 功能 


在 本 小 节 中 ， 需 要 向 用 户 讲解 在 网 页 浏览 器 中 如 何 实现 查看 网 页 源 文件 的 功能 。 当 用 
户 需 要 查看 某 个 网 页 的 源 代码 时 ,该 功能 会 调用 系统 中 的 记事 本 程序 打开 该 网 页 的 源 代码 ， 
如 图 5.19 所 示 。 

用 户 要 实现 如 图 5.19 中 的 效果 ， 需 要 在 菜单 栏 中 添加 一 个 “查看 源 文件 ”菜单 。 具 体 
步 又 如 下 : 

(1) 在 VC 资源 管理 器 中 ， 插 入 一 个 菜单 选项 ， 名 称 为 “查看 源 文件 ”，ID 设置 为 
ID_VIEWMENU， 如 图 5.20 所 示 。 
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图 5.20 插入 菜单 
(2) 添加 消息 映射 函数 ， 如 图 5.21 所 示 。 
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(3) 单 击 “Edit Code” 按 钮 ， 可 以 定位 到 函数 定义 处 添加 自 定义 代码 。 在 本 函数 中 ， 
用 户 需要 调用 系统 的 记事 本 来 打开 网 页 的 源 代码 。 

在 Windows 系统 中 ， 用 户 通 常 可 以 使 用 Shell 函数 调用 外 部 .exe 程序 。 在 这 里 ， 向 用 
户 介绍 Win32 API 函数 中 的 ShellExecute 函数 ， 其 原型 如 下 : 


HINSTANCE ShellExecutel( 


HWND hwnd, // 父 窗口 的 句柄 

LPCTSTR lpoperation, // 表 示 将 操作 的 方式 
LPCTSTR lpFile, // 表 示 将 操作 的 文件 名 
LPCTSTR lpParameters, // 表 示 传 入 程序 的 文件 名 
LPCTSTR lpDirectory, // 所 调用 程序 所 在 的 目录 名 
int nShowCmad // 以 何 种 方式 显示 程序 


) 


该 函数 调用 成 功 ， 则 返回 被 调用 程序 的 应 用 程序 句柄 。 函 数 部 分 参数 如 下 : 
口 lpOperation 表示 将 以 何 种 方式 操作 .exe 程序 。 常 用 取 值 如 表 5.5 所 示 。 


表 5.5 参数 |pOperation 常 用 取 值 


取 什 意义 
open | sf 试 | pm | 以 条 印 方式 
口 lpParameters 表示 传 入 被 启动 程序 执行 的 文件 名 ， 可 以 取 值 为 NULL。 

口 nShowCmd 表示 以 何 种 方式 显示 程序 ， 该 参数 取 值 或 组 合 值 ， 如 表 5.6 所 示 。 
表 5.6 参数 nShowCmd 常 用 取 值 
ER 

使 用 该 函数 进行 调用 系统 中 的 记事 本 程序 。 代 码 如 下 : 

::ShellExecute (this->m hWnd,"open", "notepad.exe",NULL, NULL, SW SHOW); 

// 调 用 函数 启动 记事 本 程序 

上 面 代码 的 作用 是 以 打开 模式 显 式 地 启动 记事 本 程序 。 如 果 需 要 启动 的 记事 本 打开 用 
户 指定 的 文件 ， 则 需要 将 参数 lpParameters 设置 为 需要 启动 的 文件 名 。 代 码 如 下 : 

::ShellExecute (this->m_hWnd, "open", "notepad.exe","d:\ 我 的 文档 \ 桌 面 \ 新 建文 本 

文档 .txt", NULL, SW_SHOW) ; // 调 用 函数 启动 记事 本 程序 打开 文件 

执行 上 面 的 代码 ， 结 果 是 启动 记事 本 程序 同时 在 记事 本 中 打开 指定 位 置 的 文件 。 在 本 
章程 序 中 利用 该 函数 实现 查看 源 代码 功能 需要 将 接收 到 的 服务 器 响应 数据 保存 在 文件 中 。 
保存 文件 的 部 分 代码 如 下 : 


以 显示 方式 打开 程序 
以 默认 方式 打开 程序 


Se // 省 略 部 分 代码 

char sch[2048]={0}; 

::recv(s, &sch, 2048, MSG PEEK); // 接 收服 务 器 返回 的 响应 数据 

CFile file ("数据 文件 .txt",， CFile::modeCreate|CFile::modeReadWrite); 
// 创 建文 件 保存 数据 
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file.Write(&sch,2048) 7 // 将 数据 写 入 文件 
file.close(); // 关 闭 文件 


代码 中 ， 函 数 recv0 的 作用 是 在 已 经 连接 的 套 接 字 上 接收 数据 ， 参 数 s 表示 套 接 字句 
柄 。 将 上 述 保存 的 数据 文件 使 用 记事 本 程序 打开 ， 代 码 如 下 : 


::ShellExecute (this->m hWnd,"open", "notepad.exe", 


"数据 文件 .txt", NULL, SW_SHOW) 7 // 启 动 记事 本 程序 打开 文件 
在 菜单 “查看 源 文件 ”的 消息 响应 函数 中 实现 完整 的 查看 源 文件 功能 。 代 码 如 下 : 
void CMainFrame::OnViewmenu() // 查 看 源 代码 函数 


{ 
char sch[2048]={0}; 
CFile file ("原始 数据 文件 .txt", CFile::modeCreate|CFile::modeReadWrite); 
file.Read(&sch,2048); 

CString *str=(CString) &sch; 


if (str+8==200) // 消 息 响应 码 位 于 第 八 位 


While(str!=EOF) 


EUSEEIE < SEE // 判 断 字符 数据 
CFile file(" 数 据 文 件 .上 txt"，CFile::modeCcreate1CFile::modeReadWrite) 7 
// 创 建文 件 保存 数据 
file.Write(str,sizeof(str))7 // 将 数据 写 入 文件 
str+=2; // 移 动 数据 指针 
}} 
file.close(); // 关 闭 文件 


::ShellExecute (this->m_hWnd, "open", "notepad.exe", "数据 文 
件 .txt",NULL, SW_SHOW); 
// 启 动 记事 本 程序 打开 文件 
} 
} 


首先 ， 程 序 创建 原始 数据 文件 ， 然 后 再 从 该 文件 中 读 取 服务 器 返回 的 有 效 数据 并 存 入 


数据 文件 中 。 数 据 读 取 完 毕 以 后 ， 应 该 关闭 文件 ， 调 用 API 函数 ShellExecute0 启 动 记 事 本 
程序 打开 数据 文件 并 显示 其 中 的 内 容 。 


5.5.5 ”实现 刷新 功能 


在 CHtmlView 类 中 ,用户 可 以 调用 Refresh0 函 数 实现 刷新 功能 。 实际 上 ,网 页 刷新 显 
示 的 原理 是 客户 端 重新 向 服务 器 发 出 数据 请 求 ， 待 服务 器 返回 数据 后 ， 客 户 端 更 新 界面 以 
便 显 示 数 据 。 根 据 这 个 原理 ， 在 本 工程 中 ， 实 现 自 定义 的 MyRefresh0 函 数 ， 代 码 如 下 : 
void CMainFrame: :MYRefresh () // 自 定义 函数 
f 
Cstring str; // 定 义 字符 串 变 量 


GetD1gItem(IDC_COMBO1) ->GetWindowText (str); // 获 得 地 址 栏 输入 的 字符 串 
GetActiveView()->GetDocument () ->UpDateAllViews () 7 


// 调 用 函数 更 新 界面 ， 显 示 数 据 
this->Navigate2 (str, NULL, NULL); // 调 用 视图 类 函数 Navigate2 () 显示 网 页 
} 
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代码 中 ， 首 先 获取 当前 地 址 栏 中 的 网 址 ， 再 使 用 视图 类 函数 GetDocument0 获 得 文档 
类 对 象 的 指针 。 利 用 该 指针 调用 UpDateAllViews0 〇 函数 更 新 客户 端 界面 ， 显 示 数 据 。 

如 果 用 户 调用 CHtmlView 类 中 的 函数 Refresh0 进 行 数据 刷新 ， 其 原理 与 自 定义 函数 
MyRefresh0 基 本 一 致 。 代 码 如 下 : 

void CMainFrame::Refresh() 

ed )->Refresh(); // 调 用 Refresh () 函数 进行 刷新 


} 

MYyRefresh0 和 Refresh() 函 数 的 差别 在 于 两 者 的 工作 机 制 不 同 。 前 者 首先 对 界面 进行 更 
新 ， 然 后 再 调用 CHtmlView 类 的 Navigate20 函 数 重新 打开 网 页 。 而 后 者 是 直接 调用 
CHtmlView 类 的 刷新 函数 RefreshO0。 因 此 ， 读 者 可 以 根据 自 定 义 的 刷新 函数 MyRefresh()， 
学 习 有 关 网 页 刷新 的 基本 原理 以 及 编程 方法 等 。 


5.6 小 结 


在 本 章 中 , 向 用 户 讲解 了 网 页 浏览 器 的 工作 原理 , 根据 其 原理 使 用 POST 和 GET 模式 
向 服务 器 传送 数据 。 通 过 HTML 代码 向 用 户 介 绍 了 服务 器 接受 请 求 以 后 返回 的 响应 数据 结 
构 。 在 VC 中 ， 从 用 户 创建 工程 界面 编程 和 每 一 个 消息 响应 函数 的 实现 上 ， 都 向 用 户 进行 
了 非常 细致 的 讲解 。 用 户 通过 本 章 的 学 习 ， 应 该 了 解 HTTP 的 消息 请 求 以 及 响应 数据 格式 
等 基本 结构 ， 并 且 掌 握 基本 的 HTTP 编程 原理 和 扩充 这 一 知识 的 能 力 。 

同时 ， 本 章 中 的 实例 程序 也 可 以 供用 户 做 实际 项 目 时 进行 参考 或 者 扩充 。 在 随 书 光盘 
中 ， 实 例 可 以 直接 运行 或 编译 ， 但 是 由 于 实例 程序 是 在 VC 下 编写 的 ， 所 以 用 户 在 VC 8.0 
中 编译 时 需要 进行 项 目 格式 的 转换 。 关 于 转换 方式 请 读者 参考 相关 书籍 。 
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现在 ， 有 许多 即时 通信 软件 在 大 家 的 生活 中 非常 常见 ， 并 且 起 着 很 大 的 作用 。 即 时 通 
信 软 件 可 以 让 用 户 之 间 快 速 地 进行 交流 沟通 ， 也 正 是 因为 这 个 原因 使 人 们 对 即时 通信 软件 
的 需求 非常 大 ， 对 其 功能 要 求 也 很 苛刻 。 在 本 章 中 ， 将 向 用 户 介绍 实现 即时 通信 功能 的 软 
件 编 程 方法 以 及 通信 原理 。 


6.1 通信 原理 


网 络 通信 软件 的 数据 通信 是 通过 网 络 套 接 字 进行 的 。 根 据 该 原理 ， 其 编程 步骤 应 分 为 
创建 套 接 字 、 在 套 接 字 上 进行 收发 数据 、 关 闭 套 接 字 等 操作 。 在 这 里 需要 用 户 注意 ;如果 
在 服务 器 端 进行 编程 ， 成 功 创建 套 接 字 以 后 ， 需 要 将 本 地 地 址 与 端口 号 绑 定 到 已 经 创建 的 
套 接 字 。 

在 VC 中 ， 创 建 基于 对 话 框 模式 的 应 用 程序 ， 利 用 资源 管理 器 对 程序 界面 进行 整理 ， 
使 界面 整齐 、 美 观 。 但 是 ， 限 于 笔者 的 美工 水 平 ， 所 设计 出 来 的 程序 界面 仅 供用 户 学 习 和 
参考 ， 笔 者 主要 讲述 程序 设计 方法 等 。 如 果 用 户 对 界面 不 够 满意 ， 可 以 对 随 书 光 盘 中 的 本 
实例 界面 重新 进行 设计 。 客 户 端 和 服务 器 端 界 面 效果 分 别 如 图 6.1 和 图 6.2 所 示 。 


客户 端 


软件 已 经 启动 : 5 秒 
和 T 地 让: 


图 6.1 客户 端 界 面 图 6.2 服务 器 端 界 面 


外 注意 : 用 户 在 实际 使 用 时 ， 应 该 首先 启动 服务 器 ， 然 后 再 启动 客户 端 。 否则 ， 客 户 端 将 
不 能 连接 服务 器 。 
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6.1.1 通信 连接 


在 通信 软件 初始 化 时 ， 客 户 端 连 接 服务 器 的 过 程 是 该 应 用 程序 初始 化 的 第 一 步 ， 也 是 
要 的 一 步 。 用 户 利用 API 函数 创建 套 接 字 ， 需 要 对 套 接 字库 进行 初始 化 。 代 码 如 下 : 
Re /77 省 略 部 分 代码 

WSADATA data; 


DWORD ss=MAKEWORD(2,0); // 指 定 套 接 字库 版 本 号 
: :WSAStartup(ss, &data); ”// 初 始 化 套 接 字库 


当 程 序 正 常 退出 或 者 遇 到 其 他 情况 退出 时 ， 用 户 应 该 对 已 经 初始 化 的 套 接 字库 进行 释 
放 。 示 例 代 码 如 下 : 


EE 
两 
二 


Ss // 省 略 部 分 代码 
WsACleanup (); // 释 放 套 接 字 库 


1. 创建 套 接 字 


用 户 对 套 接 字 库 初 始 化 成 功 后 ， 便 可 以 调用 前 面 所 介绍 的 函数 创建 套 接 字 了 。 对 于 服 
务 器 和 客户 端 而 言 ， 服 务 器 的 套 接 字 分 为 连接 套 接 字 和 数据 收发 套 接 字 。 因 为 作为 服务 器 
不 可 能 只 响应 一 个 客户 端的 连接 请 求 ， 所 以 创建 连接 套 接 字 对 所 有 的 连接 请 求 进行 响应 。 
下 面 ， 将 分 别 向 用 户 介绍 创建 客户 端 和 服务 器 端 套 接 字 的 具体 方法 。 

(1) 创建 客户 端 套 接 字 

对 于 创建 客户 端 套 接 ， 需 要 用 户 指定 服务 器 的 人 P 地 址 和 数据 通信 端口 号 。 代 码 如 下 : 


本 // 省 略 部 分 代码 

SOCKET s; // 声 明 套 接 字 对 象 
sockaddr in addr; // 声 明 套 接 字 地 址 结构 变量 
addr.sin family=AF INET; // 填 充 套 接 字 地 址 结构 
addr.sin port=htons (80); // 指 定数 据 通 信 的 端口 
addr.sin addr.s un.s addr=inet addr (ip); // 指 定 服务 器 IP 地 址 


s=: :socket (AF_INET, SOCK_STREAM, ITPPROTO_TCP) ;  // 创 建 套 接 字 ， 并 返回 其 句柄 


(2) 创建 服务 器 套 接 字 

与 客户 端 创建 套 接 字 不 同 。 首 先 ， 用 户 需 要 创建 一 个 专门 用 于 响应 客户 端 连接 请 求 的 
连接 套 接 字 。 然 后 ， 将 该 套 接 字 与 本 地 地 址 绑 定 在 一 起 。 最 后 ， 在 该 套 接 字 上 进行 监听 ， 
监听 成 功 返 回 新 套 接 字 用 于 收发 数据 。 代 码 如 下 : 


ee // 省 略 部 分 代码 
s=: : socket (AF_INET, SOCK_STREAM, ITPPROTO_TCP) ; ”// 创 建 连接 套 接 字 对 象 
addr.sin family=AF INET; // 填 充 套 接 字 地 址 结构 


addr .sin | port=htons (80); 
addr.sin addr.S un.S addr=inet addr (str14); 
::bind(s, (sockaddr*) &addr, sizeof (addr)); ”// 绑 定 套 接 字 与 本 地 地 址 
::listen(s,1); // 监 听 套 接 字 
其 中 ,变量 str14 表示 本 地 卫 地址 。 用户 可 以 通过 gethostname0 等 函数 获取 本 地 了 地 
址 。 代 码 如 下 : 


: :gethostname ( (char*) gname, (int) sizeof (name)); // 获 得 主机 名 字 
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hostent *p=::gethostbyname ( (char*) gname); 
in addr *a=(in addr*)*p->h addr list; // 获 得 本 机 IP 地 址 
str1l4=::inet ntoa(a[0])7 // 转 换 为 主机 字 节 顺序 的 IP 


当 服 务 器 端 监听 到 客户 端的 连接 请 求 以 后 ， 可 以 调用 函数 acceptO 完 成 整个 连接 过 程 ， 
并 返回 一 个 新 的 套 节 字 。 用 户 收 发 数据 都 是 通过 这 个 新 套 接 字 进行 的 。 代 码 如 下 : 


s1=: :accept (s, NULL, NULL); // 返 回 数据 收发 套 接 字 
n=n+1; // 当 前 客户 端的 连接 数 
str13.Format ("有 %d 客户 已 经 连接 上 了 ",n) ; // 提 示 用 户 当 前 客户 端 个 数 
this->SetWindowText (str13) 7 
GetD1gItem(IDC EDIT1) ->GetWindowText((LPTSTR) csl,10000) ; 
: :getpeername (sl, (SOCKADDR*) &add, (int*) sizeof (add)); 


// 获 取 连 接客 户 端的 IP 
strl3+=cs1; 
SErl3r "NNn" // 添 加 换行 符号 
strl3+=::inet ntoaladd.sin addr); // 转 换 为 主机 字 节 的 IP 


str13+=" 登 录 到 聊天 室 "; 
GetDlgItem(IDC EDIT1)->SetWindowText (str13); 
通过 以 上 代码 , 用 户 可 以 清楚 地 看 到 本 地 人 P 地 址 和 与 服务 器 连接 的 客户 端正 等 信息 。 
函数 accept0 只 能 在 服务 器 端 进行 调用 ， 因 为 该 函数 仅 用 于 响应 客户 端 连 接 请 求 。 


2. 连接 套 接 字 


在 客户 端 中 ， 套 接 字 创建 完成 以 后 ， 用 户 需 要 通过 该 套 接 字 向 服务 器 发 出 连接 请 求 。 
通常 ， 该 操作 由 函数 connect0 进 行 ， 该 函数 返回 -1， 表 示 失 败 。 和 否则， 表示 成 功 。 例 如 ， 
客户 端 连接 服务 器 ， 服 务 器 端 耳 为 218.6.132.5， 端 口 为 80。 代 码 如 下 : 


addr .sin family=AF INET7 
addr.sin port=htons (80) 


addr.sin addr.S_un.S addr=inet addr ("218.6.132.5"); // 指 定 服务 器 IP 地 址 
Ss=: :Socket (AF INET,SOCK STREAM,IPPROTO TCP) 
if(connect(s, (sockaddr*) &gaddr, sizeof (addr)) !=-1) 


// 向 服务 器 发 送 连接 请 求 
所 


: :SendMessage (h, SB_SETTEXT, 1, (long) "已 经 连接 上 服务 器 ") ; 
// 状 态 栏 提示 用 户 已 经 连接 服务 器 


} 

当 客 户 端 调用 connect0 函 数 向 服务 器 发 出 连接 请 求 以 后 ， 服 务 器 会 调用 accept0 函 数 
对 其 进行 响应 ， 并 返回 数据 收发 套 接 字 。 例 如 ， 比 较 简 单 的 服务 器 响应 客户 端 连接 请 求 。 
代码 如 下 : 


3 // 省 略 部 分 代码 
if(s1=::accept(s,NULL,NULL) !=NULL) // 响 应 客户 端的 连接 请 求 
{ 

MessageBox ("客户 端 连 接 成 功 ! ") ; // 提 示 用 户 


else 

{ 

MessageBox ("客户 端 连 接 失败 ! ") ; 
} 


当 用 户 在 客户 端 界 面 中 ， 单 击 “ 网 络 设置 ”按钮 后 ， 客 户 端 程序 将 弹出 “设置 ”对 话 
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框 。 该 “设置 ”对 话 框 可 以 根据 用 户 输入 的 信息 连接 指定 的 服务 器 (默认 连接 端口 为 80) 。 
“设置 ”对 话 框 ， 如 图 6.3 所 示 。 

在 这 里 ， 如 果 运 行 该 程序 的 机 器 没有 连接 网 络 ， 则 可 以 使 用 计算 机 的 回环 瑟 地址 
“127.0.0.1”。 当 服务 器 监听 并 响应 客户 端的 请 求 后 ， 在 服务 器 端 界面 上 会 显示 当前 连接 到 
服务 器 的 客户 端 个 数 ， 如 图 6.4 所 示 。 


软件 已 经 启动: 41 秒 
EI 


本 机 IF 地 址 : 192. 163.0.3 


127.0.0.1 


图 6.3 为 客户 端 指定 服务 器 IP 和 端口 图 6.4 服务 器 接受 连接 后 显示 客户 端 连 接 数 


用 户 可 以 从 图 6.4 中 看 到 ， 服 务 器 端 显示 了 当前 连接 的 客户 端 数 和 客户 端的 瑟 地 址 等 
信息 。 在 操作 过 程 中 ， 用 户 需要 特别 注意 : 一 定 需要 先 启 动 服务 器 ， 再 启动 客户 端 。 否 则 
连接 不 一 定 会 成 功 。 用 户 从 服务 器 和 客户 端 界面 的 截图 中 可 以 看 出 ， 两 者 的 状态 栏 不 但 有 
提示 作用 ， 还 具有 根据 时 间 变 化 而 改变 颜色 的 作用 。 关 于 该 状态 栏 的 编程 应 用 将 在 6.4.4 
节 内 容 中 详细 讲述 。 


6.1.2 ”发 送 接收 


现在 ， 用 户 创建 完 套 接 字 以 后 ， 可 以 使 用 该 套 接 字 进 行 数据 的 发 送 和 接收 操作 。 为 了 
方便 用 户 书写 代码 ， 可 以 通过 函数 WSAAsyncSelect0 将 套 接 字 设 置 为 异步 模式 ， 即 有 相应 
消息 到 来 时 才 调 用 相应 的 代码 。 

将 客户 端 套 接 字 设置 为 异步 模式 。 应 该 首先 自 定义 消息 ， 然 后 声明 消息 响应 函数 ， 最 
后 设置 异步 套 接 字 。 首 先 ， 在 头 文件 “网 络 通 信 2Dlg.h” 中 ， 定 义 消息 WM_SOCKT。 

#define WM SOCKT WM USER+1 

然后 ， 再 在 头 文件 中 声明 消息 响应 函数 ， 保 护 属性 设置 为 public。 代 码 如 下 


afx msg void Onsockt] (WPARAM wParam, LPARAM lParam); 


最 后 ， 设 置 套 接 字 为 异步 模式 并 在 消息 响应 函数 中 添加 代码 。 代 码 如 下 : 


必要 // 省 略 部 分 代码 
::WSRARsyncSelect (s,this->m hWnd,WM SOCKT,FD READIFD ACCEPT); 
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// 设 置 异 步 套 接 字 

void CMVY2D1g: :Onsocktl (WPARAM wParam, LPARAM lParam) // 消 息 响 应 函数 

{ 

Switch (lParam) 

{ 
case FD READ: // 处 理 读 取 事件 

char s2[100]={0},ssa[20000]; 

CString data=""; 

sockaddr in add; // 套 接 字 地 址 结构 变量 
: :memset (&add, 0, sizeof (add)); 
: :getpeername (s, (SOCKADDR*) &add, (int*) sizeof (add)); // 获 取 对 方 IP 地 址 


recv (s, s2,100, NULL); // 接 收 数据 
GetD1gItem(IDC_EDIT1) ->GetWindowText ( (LPTSTR) ssa,20000); 
data+= (LPTSTR) ssa; // 格 式 化 数据 
datat+="\r\n"; // 换 行 
data net ntoaladd.sin addr); // 转 换 IP 地 址 顺序 
data+=" 对 您 说 : "; 
data+=S27 
GetD1gItem(IDC_EDIT1) ->SetWindowText (data) 7 // 设 置 界面 


} 


对 于 服务 器 端 而 言 ， 其 设置 异步 套 接 字 的 方法 与 客户 端 一 样 。 代 码 如 下 : 


WSAAsyncSelect (s, this->m hWnd,WM SOCK,FD ACCEPTI|FD READ); 
// 设 置 异步 套 接 字模 式 
void CMy12D1g: :Onsoc (WPARAM wParam,LPARAM lParam) // 消 息 响应 函数 
{ char cs[100],csl[10000],name[15]7 
switch (lParam) 


case FD ACCEPT: // 处 理 连接 请 求 
{ 
sl=: :accept (s, NULL, NULL); // 接 受 客户 端的 连接 请 求 
n=n+1; // 计 数 


str13.Format ("有 %d 客户 已 经 连接 上 了 ",n) 7 // 格 式 化 字符 串 
this->SetWindowText (str13) 7 
GetD1gItem(IDC EDIT1) ->GetWindowText ( (LPTSTR)cs1,10000); 
: :getpeername (sl, (SOCKADDR*) &add, (int*) sizeof (add)); 
// 获 得 连接 对 方 的 IP 地 址 
strl3+=csl1; 
strl3+="\r\n"; 
strl3+=: :inet ntoa(add.sin addr); 
str13+=" 登 录 到 聊天 室 "; 
GetDlgItem(IDC EDIT1) ->SetWindowText (str13); 
} 
break; 
case FD READ: // 处 理 读 取 事件 
| 
Cstring num=""; 
recv (sl,cs,100, NULL); // 接 收 数据 


GetDlgItem(IDC EDIT1) ->GetWindowText ( (LPTSTR)cs1,10000); 
//GetDlgItem(IDC EDIT2)->GetWindowText ( (LPTSTR)cs,100); 
num+= (LPTSTR) cs17 


numt+="\r\n™; 
num+=::inet ntoal(add.sin addr)7 
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// 将 IP 转换 为 主机 顺序 
mum+=" 对 您 说 : "; 
num+=cs7 
GetD1gItem (IDC_EDIT1) ->SetWindowText (num) ;} 
break; 
} 
} 


用 户 将 上 面 的 示例 程序 分 别 进行 编译 、 运 行 ， 可 以 得 到 客户 端 和 服务 器 端 应 用 程序 ， 
结果 如 图 6.5 和 图 6.6 所 示 。 


软件 已 经 启动 : 93 秒 
机 TP 地 证 :1 


图 6.5 服务 器 端 界面 图 6.6 客户 端 界面 
当 客 户 端 向 服务 器 发 送 字符 串 成 功 以 后 ， 服 务 器 端 会 显示 “str+ 对 您 说 : +string”。 其 
中 ，str 表示 连接 的 客户 端的 IP 地 址 ，string 表示 客户 端 向 服务 器 发 送 的 字符 串 。 相 反 亦 
成 立 。 
和 注意 : 在 实例 中 显示 的 客户 端 和 服务 器 IP 地 址 都 是 “0.0.0.0”， 主 要 是 由 于 笔者 编写 该 
程序 时 ,计算 机 并 未 连接 网 络 ,程序 中 所 使 用 的 人 P 是 计算 机 的 回环 IP*127.0.0.1”。 


6.2 发 送 端 程序 


本 节 所 涉及 到 的 发 送 端 程序 也 就 是 前 面 所 讲 到 的 服务 器 端 。 在 VC 中 ， 设 计 如 图 6.2 
所 示 的 软件 界面 。 界 面 设计 步骤 与 前 面 一 样 ， 所 以 在 这 里 不 再 歼 述 。 界 面 中 各 控件 ID 以 
及 含义 如 表 6.1 所 示 。 


表 6.1 服务 器 界面 控件 ID 及 含义 


ID 含 义 
IDS_STATIC 服务 器 端 发 送 的 数据 
IDC_EDIT1 显示 连接 状态 和 收发 数据 | IDC_BUTTON1 发 送 按钮 
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6.2.1 创建 连接 套 接 字 


在 服务 器 编程 中 ， 需 要 用 户 创建 两 个 套 接 字 对 象 ， 分 别 是 连接 套 接 字 和 数据 收发 套 接 
字 。 在 本 节 中 ， 将 向 用 户 详 细 介 绍 创建 服务 器 连接 套 接 字 等 具体 实现 。 

首先 ， 在 头 文件 “12Dlg.h” 中 ， 声 明 连 接 套 接 字 对 象 ， 其 保护 属性 修改 为 public。 代 
码 如 下 : 


class CMy12Dlg : public CDialog 
! 


public: 
CMy12D1g (CWnd* pParent = NULL); / /构造 函数 
SOCKET sl1; // 声 明 连 接 套 接 字 对 象 


让 // 省 略 部 分 代码 
然后 ， 在 应 用 程序 初始 化 函数 OnInitDialog0 中 添加 完整 的 创建 代码 。 代 码 如 下 : 


BOOL CMVY12D1g: :OnInitDialog() 
{ 


WSADATA data; 

DWORD ss=MAKEWORD (2,0); // 初 始 化 SOCKET 库 

: :WSAStartup(ss, &data); 

Ss=: :socket (AF_INET, SOCK_STREAM, IPPROTO TCP); 
hh[0]=: :LoadIcon (AfxGetApp () ->m hInstance, (char *)IDI ICON1); 
hh[1]=::LoadIcon (AfxGetApp () ->m hInstance, (char *)IDI ICON2); 
//::SetCclassLong (m hWnd,GCL HCURSOR, (long)cuser); 
: :gethostname ( (char*) gname, (int) sizeof (name) ) ; // 获 得 主机 名 字 


hostent *p=::gethostbyname ( (char*) gname); // 通 过 主机 名 获取 IP 地 址 
in addr *a=(in addr*)*p->h addr list; // 取 得 本 机 IP 地 址 
str14=: :inet ntoa(la[0]); // 将 IP 地 址 转换 为 主机 字 节 顺序 
str15+=" 本 机 IP 地 址 : "; // 获 得 本 机 IP 地 址 


strl5+=strl4; 

GetDlgItem(IDC STATIC2)->SetWindowText (str15); 
::SendMessage (m_hWnd,WM_SETICON, 0, (long)hh[0]); // 发 送 WM_SsETICON 消息 
statu=: :CreatestatusWindow (WS_CHILD1WS_VISIBLE, "欢迎 使 用 本 软件 的 服务 器 ! ( 作 


者 : 梁 伟 ) ", this->m_hWnd, IDC_123); // 创 建 状态 栏 
::SendMessage (statu, SB_SETBKCOLOR, 0, (long)RGB(154,15,15)); 
// 初 始 化 状态 栏 颜色 


adqdr.sin family=AF INET; 

adqdr.sin port=htons (80); 

addr.sin addr.s un.s addr=inet addr(str14); // 将 IP 转换 为 网 络 字 节 顺序 
::bind(s, (sockaddr*) &addr, sizeof (addr)); // 绑 定 套 接 字 
::listen(s,1); // 监 听 套 接 字 
WSAAsyncSelect (s, this->m hWnd,WM SOCK,FD ACCEPT|FD RERD) 

return TRUE; 

} 


最 后 ， 当 服务 器 端 程序 监听 到 客户 端的 连接 请 求 以 后 ， 调 用 自 定义 消息 响应 函数 进行 
处 理 相关 请 求 消息 。 代 码 如 下 : 
void CMy12D1g::Onsoc (WPARAM wParam, LPARAM lParam) // 消 息 响应 函数 


{ char cs[100],csl1[10000],name[15]; 
switch (lParam) 
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case FD ACCEPT: // 处 理 连接 请 求 
并 
s1=: :accept (s, NULL, NULL); / /接受 客户 端的 连接 请 求 
n=n+1; // 计 数 


strl13.Format ("有 %d 客户 已 经 连接 上 了 ",n); // 格 式 化 字符 串 
this->SetWindowText (str13); 
GetDlgItem(IDC EDIT]1)->GetWindowText ( (LPTSTR)cs1,10000); 
: :getpeername (sl1, (SOCKADDR*) &add, (int*) sizeof (add)); 
// 获 得 连接 对 方 的 IP 地 址 

strl3+=Cs1; 
strl3+="\r\n"; 
strl3+=::inet ntoa(add.sin addr); 
str13+=" 登 录 到 聊天 室 "; 
GetDlgItem(IDC EDIT1)->SetWindowText (str13); 

} 

break; 


case FD READ: // 处 理 读 取 事件 
{ 


Cstring num=""; 
recv (sl,cs,100, NULL); // 接 收 数据 


GetDlgItem(IDC EDIT1)->GetWindowText ( (LPTSTR)cs1,10000); 


//GetDlgItem(IDC EDIT2)->GetWindowText ( (LPTSTR)cs,100); 
num+= (LPTSTR) cs17 
num+="\r\n™; 
num+=: :inet ntoa(add.sin addr); 


// 将 IP 转换 为 主机 顺序 
numt=" 对 您 说 : "; 
numt=Cs; 
GetDlgItem(IDC EDIT1)->SetWindowText (num);} 


break; 
} 
通过 上 面 的 代码 ， 用 户 已 经 创建 了 服务 器 连接 套 接 字 ， 并 且 将 该 套 接 字 设置 为 异步 模 
式 。 用 户 可 以 在 其 响应 函数 中 处 理 连接 和 读 取 事件 。 
6.2.2 创建 发 送 套 接 字 


在 服务 器 端 创建 发 送 套 接 字 , 只 能 通过 函数 acceptO 响 应 客户 端 请 求 , 并 返回 相应 的 套 
接 字 句柄 。 代 码 如 下 : 


s1=: :accept (s, NULL, NULL); // 接 受 客户 端的 连接 请 求 
recv (sl,cs,100, NULL); // 接 收 数据 
send(sl,cs,100, NULL); // 发 送 数据 


发 送 套 接 字 sl 是 函数 accept0 返 回 的 新 套 接 字 对 象 ， 如 果 sl 不 为 NULL， 则 用 户 可 以 
在 套 接 字 s1 上 接收 和 发 送 数据 。 在 本 章 中 ， 发 送 套 接 字 主 要 被 用 于 程序 的 发 送 功能 。 


6.2.3 ”实现 发 送 功能 


根据 图 6.2 所 示 ， 如 果 用 户 需要 将 数据 发 送出 去 ， 则 必须 实现 发 送 数据 的 功能 。 首 先 ， 
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户 需要 为 “发 送 ”按钮 添加 消息 响应 函数 ， 如 图 6.7 所 示 。 


Message Maps | Member Variables | Automation | Aaivex Events | classmfo | 
Broject: Class name: 区 
12 了 可 lcMy12Dig | 
C4. 服务 器 W12DIg.h, C4. 服务 器 W12DIg.cpp sl 
DbjectlDs: Messages: Delete Function 
CCMyizD 
BN_DOUBLECLICKED ed 
IDC_EDITI 
IDC_EDIT2 
IDC-STATICI1 
IDc-sTATIC2 
Member functions: 
¥ DoDataExchange A 
W OnCtiColor ON_WM_CTLCOLOR 
W oniniDialog ON_WM_INITDIALOG 
W onLBuronDpown ON_WM_LBUTTONDOWN 加 
Description: 。 Indicates the user clicked a buton 
| 砷 ] 了 


图 6.7 添加 “发 送 ”按钮 的 消息 响应 函数 
然后 ， 用 户 单 击 “确定 ”按钮 完成 添加 消息 响应 函数 。 其 函数 实现 如 下 : 


void CMy12D1g: :OnButtonl () // 发 送 按钮 消息 响应 函数 
{ 
// TODO: Add your control notification handler code here 
char sever[100]; // 声 明 字符 数组 变量 
GetD1gItem(IDC_EDIT2) ->GetWindowText ( (LPTSTR) sever, 100); 

// 获 取 要 发 送 的 数据 
CString tr="", Strl=""y // 声 明 字符 串 变 量 
GetD1gItem(IDC_EDIT1) ->GetWindowText (str) // 获 取 发 送 框 中 的 数据 
if(str!="") // 判 断 发 送 数据 是 否 为 空 
{str+="\r\n";} // 添 加 换行 符 


GetDlgItem(IDC EDIT2)->GetWindowText (str1); 

str+=strl; 
GetD1gItem(IDC_EDIT1) ->SetWindowText (str) ; // 设 置 程序 界面 的 显示 
send(sl, sever, 100,0); // 发 送 数据 


以 上 代码 实现 了 服务 器 基本 的 发 送 功能 。 并 且 在 将 数据 发 送 到 客户 端的 同时 ， 也 在 服 
务 器 本 身 的 界面 中 显示 。 这 样 ， 可 以 让 用 户 看 见 对 方 发 来 的 消息 ， 也 可 以 看 见 自己 发 送 给 
对 方 的 消息 ， 使 界面 充满 了 人 性 化 。 

在 本 章 实例 中 ， 程 序 仅 支持 字符 串 的 发 送 与 接收 。 用 户 可 以 在 这 些 功能 函数 中 实现 一 
些 字符 串 与 其 他 格式 的 数据 转换 的 操作 ， 以 便 用 户 在 学 习 套 接 字 编程 的 基础 知识 以 及 基本 
原理 的 同时 得 到 其 他 相关 知识 的 提高 。 


6.3 ”接收 端 程序 


接收 端 程序 也 就 是 客户 端 程序 。 客 户 端 程序 仅仅 支持 发 送 和 接收 数据 的 功能 。 在 客户 
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端 中 ， 同 样 具有 服务 器 的 功能 。 例 如 ， 监 听 端 口 等 功能 。 
6.3.1 监听 端口 


在 客户 端 中 ， 实 现 监听 端口 的 功能 可 以 让 复杂 的 原理 封装 在 一 个 或 者 几 个 功能 函数 
中 ， 方便 用 户 编程 。 微 软 的 MFC 类 库 就 是 一 个 很 好 的 例子 。 

客户 端 实现 监听 端口 功能 需要 依靠 异步 套 接 字 ， 与 服务 器 的 监听 功能 不 一 样 。 其 原理 
是 自 定义 一 个 监听 函数 ， 再 将 客户 端的 套 接 字 设 置 为 异步 模式 ， 套 接 字 的 处 理事 件 是 
FD_READ。 读者 需要 注意 : 客户 端的 监听 端口 功能 是 一 种 逻辑 意义 上 的 功能 ,并非 像 服务 
器 的 监听 功能 那样 时 刻 监测 指定 端口 。 


1. 定义 监听 函数 


用 户 需要 为 工程 添加 一 个 自 定 义 函 数 作为 客户 端的 监听 函数 。 当 然 ， 这 个 函数 可 以 由 
用 户 随 意 命 名 。 但 是 为 了 方便 阅读 代码 和 调试 代码 , 所 以 在 本 章 中 , 将 该 函数 命名 为 Listen。 
首先 ， 打 开工 程 的 类 视图 列表 。 由 于 工程 基于 对 话 框 模式 ， 所 以 在 CMy2Dlg 类 中 添 
Listen() 函 数 。 添 加 方式 是 右 击 CMy2Dlg 节点 ， 弹 出 快捷 菜单 ， 如 图 6.8 所 示 。 
然后 ,选择 Add Member Funtion 命令 ,弹出 “添加 成 员 函 数 ” 对 话 框 ， 如 图 6.9 所 示 。 
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Add a member tunction In the selected class- 4 
图 6.8 选择 添加 自 定义 函数 图 69 “添加 成 员 函数 ”对 话 杠 


用 户 在 “添加 成 员 函 数 ” 对 话 框 中 ， 可 以 指定 自 定 义 函 数 的 一 些 相关 信息 ， 如 表 6.2 
所 示 。 
表 6.2 自 定 函 数 相 关 信息 
函数 类 型 函数 描述 参数 类 型 参数 意义 函数 保护 属性 
void Listen(SOCKET s) SOCKET 需要 被 监听 的 套 接 字句 柄 | Public (公共 ) 
用 户 将 表 6.2 中 所 示 的 函数 信息 填 入 “添加 成 员 函 数 ” 对 话 框 中 ， 然 后 单 击 “ 确 定 ” 
按钮 ， 编 译 器 会 定位 到 自 定义 函数 处 。 在 函数 中 将 套 接 字 设置 为 异步 模式 ， 代 码 如 下 : 
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void CMVY2D1g: :Listen(SOCKET s) 
t 
: :WSRAsyncSelect (s,this->m hWnd,WM LISTENSOCK，FD READ) ; // 设 置 异步 套 接 字 
2 // 省 略 部 分 代码 
用 户 通过 上 面 的 代码 可 以 看 到 自 定义 函数 Listen0 中 仅 一 行 代 码 。 作 用 是 将 指定 套 接 字 
设置 为 异步 模式 ， 触 发 该 套 接 字 的 事件 是 FD READ， 响 应 消息 是 WM_LISTENSOCK。 该 
消息 需要 在 调用 前 进行 自 定义 。 代 码 如 下 : 
#define WM LISTENSOCK WM USER+100 // 自 定义 响应 消息 


在 头 文件 “网 络 通信 2Dlg.h” 中 ， 声 明 事 件 消息 响应 函数 Onlistensockt0。 代 码 如 下 : 


asx msg BOOL Onlistensockt (WPARAM wParam,LPARAM lParam); 


然后 ， 将 自 定义 消息 与 响应 函数 通过 消息 映射 宏 联系 起 来 。 


// 省 略 部 分 代码 
BEGIN MESSAGE MRP(CMY2D1g，CDialog) 
//{{AFX MSG MRP (CMY2D19g) 

ON_WM SYSCOMMRND () 

ON WM PRINT () 

ON_ MESSAGE (WM LISTENSOCK,Onlistensockt) // 建 立 自 定义 消息 响应 
//}}AFX MSG MRP 

END MESSAGE MRP () 


// 省 略 部 分 代码 


现在 ， 用 户 已 经 完成 了 添加 自 定 义 函 数 Listen 和 异步 套 接 字 触发 消息 以 及 响应 函数 。 
下 面 ， 将 向 用 户 讲述 异步 套 接 字 触 发 消息 的 响应 函数 的 具体 实现 方法 。 代 码 如 下 : 


Cstring num; // 声 明 全 局 变量 num 
BOOL isrecv; // 声 明 全 局 变量 isrecv 
// 省 略 部 分 代码 
BOOL CMVY12D1g:: Onlistensockt (WPARAM wParam,LPARAM lParam) 

// 消 息 响 应 函数 


{ char cs[100],csl[10000],name[15]7 
Switch (lParam) 
{ 
case FD READ: // 处 理 读 取 事 件 
recv (sl, &cs, 100, NULL); // 接 收 数据 


GetD1gItem(IDC EDIT1) ->GetWindowText ( (LPTSTR)cs1,10000); 


//GetDlgItem(IDC EDIT2)->GetWindowText ((LPTSTR) cs,100) 7 
num+= (IPTSTR) cs17 
numt="\r\n"; 
num+=cs7 
if (num!=NULL) 
{ 


isrecv= true; // 接 收成 功 则 赋值 true 
| 
else 
{ 
isrecv=false; // 否 则 赋值 false 
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default: break; // 处 理 其 他 事件 
}} 


在 消息 响应 函数 中 ， 如 果 接 收 消息 成 功 ， 则 表示 端口 监听 成 功 并 将 全 局 变量 isrecv 赋 
值 为 ttue， 否 则 监听 失败 并 赋值 为 flse。 然 后 ， 用 户 在 自 定 义 监听 函数 Listen0 中 ， 可 以 根 
据 变量 isrecv 的 值 判断 监听 是 否 成 功 。 代 码 如 下 : 

void CMy2Dlg::Listen(SOCKET s) 


: :WSAAsyncSelect (s,this->m hwnd,WM LISTENSOCK, FD READ); 


// 设 置 异步 套 接 字 
if (isrecv) // 判 断 监听 是 否 成 功 
2 MessageBox (" 监 听 端 口 成 功 ! ") // 提 示 用 户 监听 成 功 
else : 
be oh / /否则 提示 用 户 监听 失败 


} 
2. 调用 自 定义 函数 


用 户 通过 以 上 对 监听 功能 原理 的 分 析 ， 己 经 知道 怎样 实现 客户 端 监听 端口 功能 。 下 面 
将 调用 自 定义 函数 Listen0 实 现 监听 功能 ， 代 码 如 下 : 


adqr.sin_ family=AF INET7 

adqr.sin port=htons (80); 

addr.sin addr.S un.S addr=inet addr("218.6.132.5"); 

s=: :Socket (AF_INET, SOCK_STREAM, ITPPROTO_TCP) ; ”// 创 建 套 接 字 

Listen(s); // 调 用 自 定义 函数 监听 套 接 字 
5 // 省 略 部 分 代码 


本 节 通 过 实现 自 定义 监听 函数 ， 向 用 户 介绍 了 在 VC 中 添加 类 成 员 函 数 的 方法 以 及 客 
户 端 监听 功能 的 基本 原理 。 并 且 通 过 实现 自 定义 函数 ， 对 客户 端 和 服务 器 端的 监听 功能 进 
行 区 别 。 


6.3.2 ”接收 数据 


在 6.3.1 节 中 ， 用 户 实现 了 自 定义 监听 函数 。 在 该 函数 中 ， 通 过 接收 数据 成 功 与 否 来 
判断 端口 监听 是 否 成 功 ， 这 说 明 接 收 数据 这 一 功能 非常 重要 。 在 Windows 编程 中 ， 接 收 网 
络 数据 的 函数 是 recvO， 其 原型 如 下 : 


int recv (SOCKET s,char FRR+ buf,int len,int flags) 7 


该 函数 将 返回 实际 接收 到 的 字 节 数 。 各 参数 含义 如 下 : 

口 参数 s 表 示 通 信 的 套 接 字 句柄 。 

口 参数 buf 表示 用 于 接收 数据 的 缓冲 区 。 

口 参数 len 表示 缓冲 区 的 大 小 。 

口 参数 flags 表示 指定 的 接收 模式 。 一 般 情况 下 , 将 该 参数 设置 为 NULL, 表示 默认 。 
使 用 recv0 函 数 进行 接收 数据 ， 代 码 如 下 : 


"ys 


第 2 篇 Visual C++ 网 络 编程 典型 应 用 
// 省 略 部 分 代码 


adqr .sin family=AF INET7 
addqr .sin port=htons (80) 7 
addr.sin addr.s un.s addr=inet addr("218.6.132.5"); 

s=: :Socket (AF_INET,SOCK STREAM,IPPROTO TCP);  // 创 建 套 接 字 


char recv[100]={0}; // 定 义 并 初始 化 缓冲 区 
int num=0; // 定 义 接 收 数据 的 字 节 数 
num=: :recV(s,&recvVv100,NULL) 7 // 调 用 函数 接收 数据 
if (num==0) // 判 断 接收 是 否 成 功 
1 
MessageBox (" 接 收 数据 失败 ! ") ; // 提 示 用 户 接收 失败 
} 
else 
{ 
MessageBox ("接收 数据 成 功 ! ") 7 // 提 示 用 户 接收 成 功 
} 


如 果 用 户 在 实际 编程 中 经 常 需 要 反复 调用 函数 接收 数据 ， 那 么 应 该 将 接收 数据 的 功能 
代码 封装 为 自 定义 函数 。 这 样 ， 不 仅 减 少 了 在 代码 中 相互 调用 造成 的 错误 ， 还 方便 用 户 阅 


读 代 码 。 代 码 如 下 : 


void CMY2D1g: :Myrecv (SOCKET s,char *buff,int len,int flags) 
‘ 
addr.sin family=AF INET; // 填 充 套 接 字 地 址 结构 
adqdr.sin port=htons (80); 
addr.sin addr.S un.S addr=inet addr ("218.6.132.5"); 
s=: :Socket (AF_INET, SOCK_STREAM, TPPROTO_TCP) ;  // 创 建 套 接 字 


int num=0; // 定 义 接收 数据 的 字 节 数 
num=: :recv(s, gbuff, len, flags); // 调 用 函数 接收 数据 
if (num==0) // 判 断 接收 是 否 成 功 
业 
MessageBox (" 接 收 数据 失败 ! ") 7 // 提 示 用 户 接收 失败 
} 
else 
{ 
MessageBox ("接收 数据 成 功 ! ") 7 // 提 示 用 户 接收 成 功 
} 


在 自 定义 接收 函数 Myrecv0 中 ， 其 参数 与 recv0 的 参数 所 表示 的 意义 相同 ， 返 


可 类 型 


为 void。 如 果 用 户 在 上 节 中 的 异步 套 接 字 事 件 消息 响应 函数 中 使 用 自 定义 接收 函数 


Myrecv0， 那 么 具体 代码 如 下 : 


BOOL CMVY12D1g:: Onlistensockt (WPARAM wParam, LPARAM lParam) 


// 消 息 响应 函数 
{ char cs[100],csl1[10000],name[15]; 
switch (lParam) 
| 
case FD_RERD: // 处 理 读 取 事件 
Myrecv (sl, &cs, 100, NULL); // 自 定义 函数 接收 数据 


GetD1gItem(IDC_EDIT1) ->GetWindowText ( (LPTSTR)cs1,10000); 


num+= (LILPTSTR) cs17 
numt="\r\n"; 
numt=cs; 
if (num!=NULL) 
{ 
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isrecv= true; // 接 收成 功 则 赋值 true 
下 
else 
{ 
isrecv=false; // 否 则 赋值 false 
}break; 
default: break; // 处 理 其 他 事件 
}} 


在 异步 套 接 字 的 事件 消息 响应 函数 中 ， 调 用 自 定义 函数 Myrecv0 接 收 数据 不 仅 提 高 了 
代码 的 运行 效率 ， 而 且 让 用 户 对 代码 的 逻辑 性 一 目 了 然 。 因 此 ， 用 户 在 以 后 的 编程 中 ， 应 
当 尽量 将 大 部 分 的 功能 代码 封装 为 一 个 或 者 几 个 主要 函数 。 这 样 有 利于 用 户 养 成 良好 的 编 
程 习惯 。 


6.4 界面 美化 编程 


在 本 章 的 前 面 几 节 中 ， 主 要 向 用 户 讲述 网 络 通信 器 的 基本 原理 和 编程 技巧 等 。 然 而 对 
于 一 个 优秀 的 即时 通信 软件 而 言 ， 还 需要 美化 软件 的 界面 ， 才 能 实现 软件 的 人 性 化 设计 。 
因此 ， 软 件 界面 编程 也 是 软件 设计 的 重要 步 又， 下面 本 节 分 别 以 客户 端 与 服务 器 端 界 面 编 
程 进行 讲解 。 


6.4.1 界面 初始 化 


在 客户 端 程序 界面 中 , 需要 用 户 输入 服务 器 IP 地 址 等 信息 以 后 , 才 会 提示 用 户 可 以 连 
接 服务 器 ; 或 者 在 用 户 提供 所 需 信息 以 后 ， 自 动 连接 服务 器 。 在 本 实例 中 ， 采 用 提示 用 户 
可 以 连接 服务 器 的 方法 。 客 户 端 启动 时 的 程序 界面 ， 如 图 6.10 所 示 。 

用 户 可 以 在 图 6.10 中 看 到 ， 当 客户 端 界面 初始 化 时 ，“ 连 接 ” 按 钮 和 “发 送 消息 ” 按 
钮 均 处 于 禁用 状态 。 如 果 用 户 需 要 连接 服务 器 ， 则 必须 单 击 “ 网 络 设置 ”按钮 ， 弹 出 “ 设 
置 ”设置 对 话 框 ， 如 图 6.11 所 示 。 


二 .通信 客户 端 [xj 


sz i150-0 


El 


图 6.10 客户 端 启 动 界面 图 6.11 设置 服务 器 信息 
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当 用 户 填写 好 服务 器 瑟 地 址 等 信息 以 后 ， 单 击 OK 按钮 返回 客户 端 主 界面 。 此 时 “ 连 
接 ” 按 钮 处 于 可 用 状态 ， 用 户 可 以 通过 单 击 该 按钮 连接 服务 器 ， 如 图 6.12 所 示 。 

此 时 ， 用 户 单 击 “连接 ”按钮 开始 连接 服务 器 ， 然 后 将 该 按钮 设置 为 禁用 状态 ， 并 且 
在 状态 栏 上 提示 用 户 “ 已 经 连接 上 服务 器 ”。 并 且 用 户 可 以 在 编辑 框 中 输入 要 发 送 的 信息 
以 后 ， 单 击 “ 发 送 消息 ”按钮 进行 发 送 消息 ， 如 图 6.13 所 示 。 


图 6.12 “连接 ”按钮 处 于 可 用 状态 图 6.13 连接 服务 器 


从 注意 : 以 上 过 程 就 是 客户 端 界面 从 初始 化 到 完全 启动 所 要 经 历 的 整个 过 程 ， 该 过 程 是 用 
户 必 须 做 的 。 


6.4.2 设置 服务 器 窗口 图 标 


为 了 使 服务 器 软件 运行 时 ， 给 用 户 一 种 运动 的 感觉 ， 所 以 在 程序 中 实现 图 标 随时 间 变 
化 而 变化 。 首 先 ， 在 工程 的 资源 列表 中 ， 插 入 两 幅 图 标 并 且 分 别 命名 为 IDLICON1 和 
IDIL ICON2， 如 图 6.14 所 示 。 


图 6.14 插入 的 图 标 资源 
然后 ， 在 工程 的 成 员 函 数 OnInitDialog0 中 载 入 图 6.14 中 的 两 幅 图 标 资源 。 代 码 如 下 : 
BOOL CMy12D1g::OnInitDialog() 
下 
汪汪 // 省 略 部 分 代码 
hh[0]=::LoadIcon (AfxGetApp()->m hIinstance, (char *)IDI ICON1); 
// 载 入 图 标 资源 
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hh[1]=::LoadIcon (AfxGetApp () ->m hInstance，(Cchar *)IDI ICON2); 
::SendMessage (m hWnd,WM SETICON,0, (long)hh[0]); // 初 始 设 置 窗口 图 标 


// 省 略 部 分 代码 


在 上 面 的 代码 中 ， 变 量 hh 是 图 标 资源 的 句柄 变量 ， 主 要 用 于 储存 读 取 的 图 标 资源 。 
在 本 工程 中 定义 句柄 变量 如 下 : 
class CMVY12D1g : public CDialog 
{ 
// 省 略 部 分 代码 


HICON hh[2]; // 定 义 句柄 变量 
| 


全 注意 : 该 句柄 必须 定义 为 CMy12Dlg 类 的 成 员 变量 ， 目 的 是 为 了 在 其 他 类 成 员 函 数 中 使 
用 该 句柄 变量 。 


最 后 ， 在 工程 中 添加 WM_TIMER 消息 的 响应 函数 ， 如 图 6.15 所 示 。 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 
Broject: Class name: 

12 悦 [cylzpm -| 
Cr 服务 器 V12DIg.h, C4..A 腿 务 器 M2DIg.cpp eu 
Object IDs: Messages: Delete Function 


WM_SETCURSOR Ce 
IDC_BUTTONT IWM_SHOWWINDOW Edk Code 
IDCJEDITI WM_SIZE 

IDC_EDIT2 IWM_TCARD 

IDC_STATIC11 
IDC_STATIC2 WM_VKEYTOITEM 
WM_VSCROLL 


Add Class… ~ 


Nember functions: 

W oninitDialog ON_WM_INITDIALOG 

W onLButtonDown ON_WM_LBUTTONDOWN 

W OnQueryDraglcon ON_WM_QUERYDRAGICON 

W OnSysCommand ON_WM_SYSCOMMAND 

[ore ow Mn 3 


Description: 。 Indicatcs timcout intcrvol for o timer hos clapscd 


图 6.15 添加 消息 响应 函数 


在 WM_TIMER 消息 的 响应 函数 OnTimer0 中 编写 实现 轮流 显示 图 标的 方法 。 代 码 
如 下 : 
void CMY12D1g: :OnTimer (UINT nIDEvent) 


i£ (1<=1) // 限 制 循环 次 数 
{ 
::SendMessage (m hWnd,WM SETICON,0, (long)hh[i++]); 
// 发 送 设置 图 标 消息 到 窗口 
} 


else // 如 果 限制 次 数 失败 ， 则 初始 化 变量 
{ 


i=0; // 为 变量 赋 0 
} 

CDialog: :OnTimer (nIDEvent); 

} 
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在 上 面 的 代码 中 ， 用 户 首先 对 变量 i 进行 判断 。 如 果 i 大 于 了 图 标 资源 个 数 ， 则 初始 
化 i 为 0， 否 则 将 变量 加 1， 然 后 向 窗口 发 送 消息 设置 窗口 图 标 。 

应 用 程序 通过 WM_TIMER 消息 的 响应 函数 就 可 以 让 窗口 的 图 标 动 起 来 。 在 程序 中 ， 
设置 程序 窗口 的 图 标 是 通过 向 窗口 发 送 WM_SETICON 消息 , 而 该 消息 的 附加 值 lParam 为 
图 标 资源 的 句柄 。 启 动 窗口 后 ， 图 标的 变化 情况 如 图 6.16 和 图 6.17 所 示 。 


软件 已 经 启动 : 8 秒 [ 软件 已 经 启动 : 35 秒 
FTP: 1 本 机 TP 地 证 : 


图 6.16 窗口 启动 8 秒 时 的 图 标 图 6.17 窗口 启动 35 秒 时 的 图 标 


外 注意 : 当 程序 窗口 启动 时 ， 已 经 被 设置 了 初始 化 图 标 。 具 体 代码 见 随 书 光盘 。 

在 图 6.16 和 图 6.17 中 ， 读 者 可 以 清晰 地 看 到 窗口 的 图 标 随 着 事件 的 变化 而 变化 。 实 
际 上 ， 图 标的 动作 主要 依赖 于 计算 机 中 的 定时 器 ， 其 每 隔 一 秒 调 用 一 次 消息 响应 函数 。 而 
用 户 则 在 该 消息 响应 函数 中 发 送 WM_SETICON 消息 到 窗口 设置 图 标 ， 因 为 人 眼 对 事物 的 
滞留 效应 ， 所 以 会 让 用 户 感觉 图 标 在 运动 。 


6.4.3 ”显示 服务 器 启动 时 间 


在 软件 成 功 启 动 后 ， 程 序 该 如 何 告 知 用 户 所 使 用 的 时 间 。 正 如 前 面 所 讲 到 的 改变 软件 
的 图 标 一 样 , 时 间 是 变化 的 , 那么 该 功能 的 实现 还 是 应 该 在 WM_TIMER 消息 响应 函数 中 。 
在 这 里 ， 将 向 用 户 介绍 一 种 比较 简单 的 实现 该 功能 的 方法 。 代 码 如 下 : 


int n2=0; // 声 明 全 局 变量 n2， 作 为 计数 变量 
Se // 省 略 部 分 代码 
void CMVY12D1g::OnTimer (UINT nIDEvent) 
{ 

if (i<=1) // 限 制 循环 次 数 
{ 

::SendMessage (m hWnd,WM SETICON,0, (long)hh[i++]); 
// 发 送 设置 图 标 消息 到 窗口 

} 
else // 如 果 限制 次 数 失败 ， 则 初始 化 变量 
i=0; // 为 变量 赋 0 
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} 
n2+=17 


str.Format ("软件 已 经 启动 : sd 秒 ", n2); 


this->SetWindowText (str); 
CDialog: :OnTimer (nIDEvent); 


// 每 过 一 秒 ，n2 自 加 
// 格 式 化 字符 串 
// 设 置 窗口 标题 


代码 运行 的 结果 如 图 6.17 所 示 。 在 本 例 中 ， 需 要 向 用 户 说 明 使 用 该 方法 显示 程序 启动 
时 间 ， 是 因为 程序 中 设置 了 定时 器 触发 时 间 正 好 是 一 秒 钟 。 如 果 在 实际 编程 中 ， 用 户 设置 
的 定时 器 时 间 不 是 一 秒 ， 那 么 就 需要 用 户 调用 MFC 类 库 中 的 函数 来 实现 。 下 面 将 向 用 户 
介绍 实现 该 功能 的 几 个 相关 函数 。 为 了 在 程序 中 需要 获得 当前 系统 的 时 间 可 以 通过 
CTime::GetCurrentTime0 函 数 实现 。 例 如 ， 获 得 当前 系统 的 时 间 ， 代 码 如 下 : 


CTime timel; 

Cstring str,strl; 

timel=CTime: :GetCurrentTime (); 
str=timel .Format ("%H: %M:%S"); 
str1=" 当 前 系统 的 时 间 是 : "; 
strl+=str; 

MessageBox (strl) 7 


// 省 略 部 分 代码 

// 定 义 CTime 类 对 象 

// 定 义 字符 串 

// 获 取 当 前 系统 时 间 

// 格 式 化 输出 时 间 字 符 串 
// 为 字符 串 赋值 

// 连 接 两 个 字符 串 
// 提 示 用 户 当前 的 系统 时 间 
// 省 略 部 分 代码 


在 VC 中 编译 并 运行 以 上 代码 ， 其 效果 如 图 6.18 所 示 。 


网 络 通 信和 器 


区 


当前 的 时 间 是 : 0: 35:04 


图 6.18 获取 当前 系统 时 间 


在 本 实例 中 ， 显 示 程 序 运行 的 时 间 是 以 秒 为 单位 ， 所 以 ， 用 户 在 本 例 中 格式 化 时 间 字 
符 串 时 只 需要 获得 时 间 的 分 秒 部 分 ， 其 余 可 以 舍 去 。 如 下 所 示 : 


int mtimel; 

int stimel; 

BOOL CMVY12D1g: :OnInitDialog() 
{ 


CTime timel; 

Cstring str,strl; 

Timel=CTime: :GetCurrentTime (); 
str=timel .Format ("%M); 

strl= timel .Format ("%S); 
mtimel=atoi (str2); 

stimel=atoi (str3); 


// 声 明 全 局 变量 


// 省 略 部 分 代码 

// 定 义 CTime 类 对 象 

// 定 义 字符 串 

// 获 取 当 前 系统 时 间 

// 格 式 化 输出 时 间 分 钟 部 分 
// 格 式 化 输出 时 间 秒 钟 部 分 
// 将 分 钟 部 分 转换 为 整 型 数据 
// 将 秒 钟 部 分 转换 为 整 型 数据 
// 省 略 部 分 代码 


上 面 的 代码 是 获取 程序 启动 时 的 分 钟 和 秒 钟 数 ， 要 完整 的 显示 程序 已 运行 时 间 则 需要 
在 定时 器 触发 响应 函数 中 动态 获取 时 间 。 其 原理 是 将 动态 获取 到 的 时 间 减 去 程序 启动 时 的 
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时 间 就 等 于 程序 已 经 运行 的 时 间 。 根 据 其 原理 ， 编 程 如 下 : 


间 。 


void CMY12D1g::OnTimer (UINT nIDEvent) 


CTime time2; 

Cstring str2,str3; 
time2=CTime: :GetCurrentTime (); 
str2=time2.Format ("%$M"); 

str3= time2.Format ("%S"); 

int mtime=atoi (str2); 

int stime=atoi (str3); 

int a; 

if((mtime- mtimel)==1) 


a=stime+60- stimel; 
} 
else 


{ 


/ /省略 部 分 代码 

/ /定义 CTime 类 对 象 

// 定 义 字符 串 

// 获 取 当 前 系统 时 间 

// 格 式 化 输出 时 间 分 钟 部 分 
// 格 式 化 输出 时 间 秒 钟 部 分 
// 将 分 钟 部 分 转换 为 整 型 数据 
// 将 秒 钟 部 分 转换 为 整 型 数据 


// 判 断 分 钟 数 是 否 相差 1 
// 直 接 使 秒 数 相 减 得 到 运行 时 间 


a= ((mtime- mtimel-1)*60+ stime)- stimel; 


} 


// 使 用 分 钟 的 差 值 乘 以 60 与 启动 时 间 相 减 


this->SetWindowText ( (CString) itoa (a) ) ; // 设 置 窗口 标题 


// 省 略 部 分 代码 


} 
用 户 根据 上 面 对 显示 软件 运行 时 间 功 能 的 编程 描述 , 结合 实际 整理 代码 ,在 CMy12Dlg 
类 的 头 文件 12Dlg.h 中 ， 添 加 全 局 变量 的 声明 。 代 码 如 下 : 


int mtimel; 

int stimel; 
class CMVY12D1g : 
{ 


public CDialog 


2 


// 声 明 全 局 变量 


// 省 略 部 分 代码 


然后 ， 根 据 程序 启动 时 所 获取 时 间 和 定时 器 触发 消息 时 的 时 间 来 确定 软件 运行 的 时 


代码 如 下 : 
BOOL CMVY12D1g::OnInitDialog() 
{ 


CTime timel; 

CString atr.strls 

Timel=CTime: :GetCurrentTime (); 
str=timel .Format ("%M"); 

strl= timel .Format ("%S"); 
mtimel=atoi (str2); 

stimel=atoi (str3); 

} 

void CMY12D1g: :OnTimer (UINT nIDEvent) 
上 


CTime time2; 

Cstring str2,str3; 
time2=CTime: :GetCurrentTime(); 
str2=time2.Format ("%M"); 

str3= time2.Format ("%S"); 
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// 程 序 初始 化 函数 


// 定 义 CTime 类 对 象 

// 定 义 字符 串 

// 获 取 当 前 系统 时 间 

// 格 式 化 输出 时 间 分 钟 部 分 
// 格 式 化 输出 时 间 秒 钟 部 分 
// 将 分 钟 部 分 转换 为 整 型 数据 
// 将 秒 钟 部 分 转换 为 整 型 数据 


// 定 时 器 触发 消息 函数 


// 定 义 CTime 类 对 象 

// 定 义 字符 串 

// 获 取 当 前 系统 时 间 

// 格 式 化 输出 时 间 分 钟 部 分 
// 格 式 化 输出 时 间 秒 钟 部 分 
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int mtime=atoi (str2); // 将 分 钟 部 分 转换 为 整 型 数据 
int stime=atoi (str3); // 将 秒 钟 部 分 转换 为 整 型 数据 
这 a mtimel) ==1) // 判 断 分 钟 数 是 否 相差 1 
a=stime+60- stimel; // 直 接 使 秒 数 相 减 得 到 运行 时 间 
a 


1 
a= ((mtime- mtimel-1)*60+ Stime)- stimel; 
// 使 用 分 钟 的 差 值 乘 以 60 与 启动 时 间 相 减 
} 

this->SetWindowText ( (CString) itoa (a) ); // 设 置 窗口 标题 

} 

void CMy12D1g::OnClose() // 关 闭 函数 

{ 


KillTimer (1); // 关 闭 定时 器 
CDialog: :OnClose(); 
} 
用 户 通过 以 上 代码 便 可 以 很 轻松 地 实现 显示 软件 已 运行 时 间 。 但 是 根据 需要 ， 用 户 可 
以 更 改 以 上 代码 以 达到 现实 需要 ， 具 体 代 码 请 参考 随 书 光盘 。 


6.4.4 ”服务 器 状态 栏 编 程 


状态 栏 在 软件 中 可 以 作为 一 个 提示 牌 显 示 一 些 提示 信息 给 用 户 ， 或 者 是 显示 帮助 。 在 
图 6.12 中 , 用 户 可 以 发 现 程序 界面 中 不 但 有 可 以 变化 的 图 标 和 时 间 ， 还 有 可 以 改变 颜色 的 
状态 栏 。 状 态 栏 编 程 在 软件 设计 中 也 是 很 重要 的 一 部 分 。 

首先 ， 创 建 状态 栏 需要 使 用 Win32 API 函数 CreateStatusWindow()。 其 原型 如 下 : 


HWND CreateStatusWindow( 
LONG style, 
LPCTSTR lpszText, 
HWND hwndParent, 
UINT wID 

); 


该 函数 创建 状态 栏 成 功 则 返回 该 状态 栏 的 句柄 ， 否 则 返回 NULL。 其 参数 如 下 : 
口 参数 style 表示 创建 的 状态 栏 窗口 样式 ， 部 分 取 值 如 表 6.3 所 示 。 


表 6.3 窗口 样式 的 部 分 取 值 


取 值 意义 
WS_POPUP 创建 弹出 窗口 
WS_MINIMIZEBOX 具有 最 小 化 按钮 
WS_CAPTION 具有 标题 栏 
WS MAXIMIZEBOX 具有 最 大 化 按钮 
WS VISIBLE 创建 的 窗口 可 见 
WS_SYSMENU 具有 系统 菜单 的 窗口 
WS CHILD 创建 子 窗口 
WS MINIMIZE 程序 窗口 启动 时 为 最 小 化 状态 
WS MAXIMIZE 程序 窗口 以 屏幕 大 小 启动 
WS HSCROLL/ WS_VSCROLL 程序 窗口 带 有 水 平 或 者 垂直 滚动 条 
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口 参数 jpszText 表示 在 状态 栏 上 的 文字 。 

口 参数 hwndParent 表示 新 创建 的 状态 栏 的 父 窗口 句柄 。 

口 参数 wID 表示 状态 栏 的 ID， 该 ID 必须 事先 进行 声明 。 

用 户 根据 表 6.3 中 的 窗口 样式 和 状态 栏 在 程序 窗口 中 的 位 置 可 以 知道 ， 创 建 状态 栏 时 
需要 为 其 指定 的 窗口 样式 为 “WS_CHILDIWS_VISIBLE”。 代 码 如 下 : 

BOOL CMVY12D1g::OnInitDialog() 

“本 :CreatestatusWindow (WS_CHILDIWS_VISIBLE, "欢迎 使 用 本 软件 的 服务 器 ! ( 作 

者 : Liangwei)",this->m hWnd,IDC 123); // 创 建 状态 栏 

人 // 省 略 部 分 代码 

在 代码 中 。 状态 栏 句柄 statu 和 状态 栏 的 ID 都 需要 事先 在 相关 文件 中 进行 声明 。 例如 ， 
在 头 文件 中 声明 状态 栏 句柄 。 


class CMy12Dlg : public CDialog 
下 


Protected: 


HWND statu; // 声 明 状态 栏 句柄 
| 


在 头 文件 Resource.h 中 定义 状态 栏 的 Jp。 定 义 代码 如 下 : 
#define IDC 123 1009 


通过 以 上 的 操作 和 代码 编写 ， 已 经 在 程序 窗口 的 界面 上 添加 了 一 个 状态 栏 ， 如 图 6.19 
所 示 。 


软件 已 经 启动 : 35 秒 
机 IP 地 址 : 192. 168.0.3 


图 6.19 在 窗口 界面 上 添加 状态 栏 


然后 ， 在 程序 运行 时 根据 时 间 的 变化 而 变化 状态 栏 的 颜色 。 改 变 状态 栏 的 颜色 可 以 向 
状态 栏 窗口 发 送 消息 SB_SETBKCOLOR， 通 过 该 消息 的 附加 参数 lParam 指定 颜色 值 。 
例如 : 
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::SendMessage (statu,SB SETBKCOLOR,0, (long)RGB(154,15,15); 


当 窗 口 显示 时 ， 状 态 栏 必须 显示 初始 颜色 值 ， 那 么 在 窗口 初始 化 函数 OnInitDialog0 
中 添加 以 下 代码 : 
BOOL CMY12D1g::OnInitDialog() 


{ 


ee // 省 略 部 分 代码 
::SendMessage (statu,SB SETBKCOLOR,0, (Long)RGB (255,0,0) 7 


// 设 置 状 态 栏 初始 颜色 值 为 红色 
省 // 省 略 部 分 代码 

与 改变 窗口 图 标 等 实现 原理 一 样 ， 改 变 状态 栏 颜色 同样 也 是 在 定时 器 触发 消息 响应 函 
数 中 进行 实现 。 但 是 需要 用 户 注意 : RGB 颜色 值 的 范围 在 0 一 255 之 间 ， 这 是 因为 在 计算 
机 系统 中 每 个 颜色 值 分 量 由 8 个 二 进 制 数 组 成 。 

在 定时 器 触发 的 消息 响应 函数 中 ， 编 写 代码 实 现 变换 颜色 的 状态 栏 。 代 码 如 下 : 


int i=0; // 定 义 并 初始 化 全 局 变量 
void CMVY12D1g: :OnTimer (UINT nIDEvent) // 定 时 器 触发 消息 函数 
上 
i+=15; // 变 量 自 加 15 

if (i>255) // 如 果 评 值 大 于 255， 则 赋值 15 
i=15; // 赋 值 15 
} 
else 


' 
::SendMessage (statu,SB SETBKCOLOR,0, (long)RGB(i,0,15)); 


// 否 则 发 送 消息 设置 状态 栏 颜色 值 
this->SetWindowText ("程序 正在 改变 颜色 ! ") 7 // 提 示 用 户 程序 正在 改变 颜色 
} 


} 

将 以 上 代码 在 VC 中 进行 编译 ,观察 其 窗口 状态 栏 的 颜色 改变 情况 如 图 6.20 和 图 6.21 
所 示 。 在 图 6.20 中 ， 所 示 为 程序 窗口 启动 时 的 状态 栏 颜色 。 在 图 6.21 中 ， 所 示 为 程序 窗 
口 运行 后 的 状态 栏 颜色 。 


服务 器 (Liang Wei) 
FT 


192. 166.0.3 


we | 


图 6.20 窗口 启动 时 的 状态 栏 颜色 图 6.21 窗口 运行 后 的 状态 栏 颜色 
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根据 两 幅 截图 可 以 知道 ， 程 序 界面 在 不 同时 刻 的 颜色 不 同 ， 用 户 可 以 打开 随 书 光 盘 中 
的 程序 自行 编译 以 后 查看 效果 。 用 户 也 可 以 试 一 试 修改 颜色 值 ， 看 看 修改 后 的 效果 。 

用 户 通过 对 图 6.20 和 图 6.21 进行 比较 ， 可 以 很 明显 地 发 现 程序 窗口 的 状态 栏 颜色 发 
生 了 很 大 变化 。 这 样 做 不 仅 使 软件 窗口 看 起 来 非常 美观 和 人 性 化 ， 还 会 让 使 用 软件 的 人 保 
持 一 种 动态 感 。 


各 注意 : 用 户 在 以 后 的 界面 编程 中 ， 软 件 界面 的 美化 编程 也 是 程序 设计 中 重要 的 一 部 分 。 
本 例 中 的 具体 代码 请 用 户 参考 随 书 光盘 。 


65 小 ”和 续 


本 章 第 一 部 分 中 ， 主 要 向 用 户 讲述 了 网 络 通信 器 的 通信 和 原理， 根据 该 原理 进行 MFC 
程序 的 设计 。 在 VC 编译 环境 下 ， 向 用 户 讲述 了 网 络 通信 器 的 服务 器 端 和 客户 端 编程 的 方 
法 以 及 流程 。 在 客户 端 编程 中 ， 使 用 自 定义 函数 对 监听 端口 的 功能 进行 了 封装 ， 用 实例 向 
用 户 介绍 了 客户 端 监听 端口 功能 的 实现 原理 。 

在 第 二 部 分 中 ， 主 要 向 用 户 讲解 在 VC 的 界面 编辑 器 中 布置 软件 的 界面 ， 并 且 编 程 实 
现 各 个 按钮 的 功能 。 在 这 一 部 分 中 ， 通 过 实现 变化 的 图 标 、 软 件 运行 时 间 显示 和 可 变色 的 
状态 栏 等 编程 向 用 户 讲述 界面 各 部 分 的 功能 以 及 实现 方法 。 

通过 对 本 章 的 学 习 , 用 户 将 对 网 络 通信 器 的 设计 及 实现 方法 有 更 加 深入 的 理解 。 同 时 ， 
用 户 可 以 将 本 章 中 的 实例 程序 进行 修改 以 达到 自我 检测 和 学 习 的 目的 。 
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邮件 收发 器 的 作用 是 在 本 地 计算 机 和 远程 计算 机 之 间 传 送 电子 信件 以 及 接收 电子 信 
件 等 操作 。 用 户 平时 所 用 的 E-mail 就 是 一 种 邮件 收发 器 。 通 常情 况 下 ，E-mail 由 发 送 者 将 
电子 信件 发 送 到 邮件 服务 器 (CSMTP) 中， 再 由 SMTP 服务 器 将 该 邮件 发 送 到 POP3 (接收 
邮件 ) 服务 器 中 ， 邮 件 接收 者 通过 账户 和 口令 再 从 POP3 服务 器 中 获取 信件 。 在 本 章 中 ， 
将 向 用 户 介绍 邮件 收发 器 的 原理 以 及 开发 过 程 。 


7.1 调用 Windows 自 带 的 邮件 发 送 程序 


一 般 情况 下 ,用 户 所 使 用 的 Windows 操作 系统 中 都 带 有 默认 的 邮件 发 送 程序 。 通 过 该 
邮件 发 送 程序 ， 用 户 可 以 将 邮件 发 送 到 任何 目的 地 址 。 这 种 方法 比较 简单 适用 ， 所 以 很 受 
大 部 分 用 户 欢迎 。 用 户 可 以 在 操作 系统 中 ， 使 用 操作 系统 命令 打开 邮件 程序 。 如 果 用 户 需 
要 在 自己 的 程序 中 调用 系统 自 带 的 邮件 程序 ， 那 么 需要 使 用 函数 CreateProcess0 或 者 
ShellExecute0 进 行 调用 。 下 面 将 分 别 介 绍 这 两 种 方法 。 


7.1.1 调用 Windows 进程 


在 Windows 操作 系统 中 , 所 有 的 程序 都 是 以 进程 为 单位 运行 。 本 节 中 所 讲述 的 调用 邮 
件 发 送 程 序 就 是 通过 调用 相应 的 Windows 进程 实现 的 。 调 用 该 Windows 进程 所 使 用 的 命 
是 “mailto:+string”， 其 中 ，string 表示 邮件 发 送 的 目的 地 址 。 例 如 ， 用 户 需要 将 邮件 发 
送 到 邮件 地 址 为 lymlrl@163.com 的 邮箱 中 ， 使 用 的 命令 是 “mailto:lymlrl@163.com”。 
首先 , 在 Windows 系统 界面 下 选择 “开始 ”| 运行 ”命令 (如 图 7.1 所 示 ) ， 弹 出 “ 运 
行 ”对 话 框 ， 如 图 7.2 所 示 。 
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图 7.1 打开 运行 对 话 框 7.2 “运行 ”对 话 框 
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然后 ， 在 运行 对 话 框 中 输入 命令 “mailto:lymlrl@163.com”， 可 以 打开 Windows 自 带 
的 邮件 发 送 程序 进行 邮件 发 送 ， 如 图 7.3 所 示 。 


文件 四 ”编辑 @) 查看 响 ”其 入 GC) 格 式 @) 工具 四。 邮 御 吕 帮助 0 


等 


拼写 检查 附件 


图 73 Windows 邮件 收发 器 


以 上 过 程 是 用 户 通过 Windows 命令 调用 邮件 收发 器 必须 做 的 。 实 际 上 , 除了 这 种 方法 ， 
用 户 还 可 以 在 程序 中 通过 函数 调用 Windows 邮件 收发 器 。 此 种 方法 将 在 7.1.2 节 中 进行 
讲解 。 


7.1.2 ”CreateProcess() 函 数 


在 VC 中 编程 ，MFC 类 库 已 经 提供 了 几 个 库 函 数 用 于 调用 Windows 的 外 部 程序 ， 包 
括 邮 件 收 发 程序 。 在 本 节 中 ， 将 向 用 户 介绍 其 中 的 两 个 函数 CreateProcess() 和 
ShellExecute()。 


1. 使 用 CreateProcess() 函 数 


CreateProcess() 函 数 可 以 创建 Windows 进程 ， 同 时 也 可 以 调用 已 经 存在 的 进程 。 该 函 
数 的 原型 如 下 : 


BOOL CreateProcess ( 

LPCTSTR lpApplicationName, 
LPTSTR lpCommandLine, 

LPSECURITY ATTRIBUTES lpProcessAttributes, 
LPSECURITY ATTRIBUTES lpThreadAttributes, 
BOOL bInheritHandles, 

DWORD dwCreationFlags, 

LPVOID lpEnvironment, 

LPCTSTR lpCurrentDirectory, 

LPSTARTUPINFO lpSstartupInfo, 

LPPROCESS_INFORMATION lpProcessInformation 
); 


该 函数 创建 进程 成 功 则 返回 ttme， 否 则 返回 false。 其 参数 意义 如 下 : 


ws 


口 
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参数 IpApplicationName 表示 可 执行 文件 的 名 字 。 用 户 指 定 该 参数 后 ， 该 函数 会 在 
当前 路 径 下 搜索 可 执行 文件 ， 但 不 会 按照 系统 的 搜索 路 径 进行 搜索 。 


全 注意 : 使 用 该 参数 时 ， 需 要 加 上 扩展 名 ， 因 为 系统 不 会 自动 为 其 添加 “.exe” 后 级 名 。 


口 


口 
口 


参数 ppCommandLine 表示 将 要 传递 到 新 进程 的 命令 行 字符 串 。 使 用 该 参数 时 ， 
函数 会 自动 为 其 添加 后 级 名 “.exe”。 如 果 参 数字 符 串 没有 指定 所 在 路 径 ， 那 么 
函数 则 会 按照 系统 的 搜索 路 径 进行 搜索 文件 。 

参数 bInheritHandles 表示 该 进程 创建 的 子 进程 是 否 能 继承 父 进程 的 对 象 句柄 。 
参数 lpStartupInfo 指向 结构 体 STARTUPINFO 的 指针 变量 。 该 结构 体 的 声明 如 下 : 


该 
该 


typedef struct STARTUPINFO { 


DWORD cb; // 表 示 该 结构 体 的 大 小 
LPTSTR lpReserved; // 保 留 ， 必 须 将 该 参数 初始 化 为 NULL 
LPTSTR lpDesktop; /* 用 于 标识 启动 应 用 程序 所 在 的 桌面 的 名 字 。 如 果 该 桌面 存 


在 ， 新 进程 便 与 指定 的 桌面 相关 联 。 如 果 桌 面 不 存在 ， 便 创建 
一 个 带 有 默认 属性 的 桌面 ， 并 使 用 为 新 进程 指定 的 名 字 。 如 果 
lpDesktop 是 NULL (这 是 最 常见 的 情况 ) ， 那 么 该 进程 将 与 


当前 桌面 相关 联 */ 
LPTSTR lpTitle; // 设 置 控制 台 程 序 的 名 称 
DWORD dwx; // 设 置 应 用 程序 窗口 的 X 坐标 
DWORD dwY; // 设 置 应 用 程序 窗口 的 坐标 
DWORD ”adwXSize7 // 设 置 应 用 程序 窗口 的 横向 大 小 
DWORD dwYSize; // 设 置 应 用 程序 窗口 的 纵向 大 小 


DWORD ”dwXCountChars;  // 以 字符 为 单位 设置 应 用 程序 窗口 的 x 坐标 
DWORD ”dwYCountChars;  // 以 字符 为 单位 设置 应 用 程序 窗口 的 Y 坐标 
DWORD ”dwFillAttribute; // 设 置 应 用 程序 窗口 所 使 用 的 背景 色 等 
DWORD dwFlags; // 表 示 创 建 窗口 的 标志 

WORD wshowWindow; // 是 否 显示 应 用 程序 窗口 

WORD cbReserved2; // 保 留 ， 将 该 参数 必须 设置 为 0 

LPBYTE lpReserved2; // 保 留 ， 将 该 参数 必须 设置 为 0 


HANDLE hstdInput; // 设 置 控制 台 程序 的 输入 输出 缓存 句柄 
HANDLE hstdoutput; 
HANDLE hstdError; // 错 误 输出 句柄 


} STARTUPINFO, *LPSTARTUPINFO; 

该 结构 体 主 要 用 于 保存 新 创建 进程 的 窗口 信息 ， 如 窗口 的 大 小 或 窗口 的 显示 方式 等 。 
其 中 ， 参 数 dwFlags 标识 了 窗口 创建 成 功 以 后 ， 在 显示 之 前 以 何 种 方式 进行 显示 。 其 取 值 
如 表 7.1 所 示 。 


表 7.1 程序 窗口 显示 标志 取 值 


取 值 含义 
STARTF USESIZE 使 用 dwXSize 和 dwYSize 成 员 
STARTF USESHOWWINDOW 使 用 wShowWindow 成 员 
STARTF USEPOSITION 使 用 dwX 和 dwY 成 员 
STARTF USECOUNTCHARS 使 用 dwXCountChars 和 dwYCountChars 成 员 
STARTF USEFILLATTRIBUTE 使 用 dwFillAttribute 成 员 


STARTF USESTDHANDLES 
STARTF RUN FULLSCREEN 


使 用 hStdInput、hStdOutput、hStdError 成 员 
以 全 屏 方 式 启动 程序 
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外 注意 : 在 表 7.1 中 所 示 的 程序 窗口 显示 标志 的 作用 仅仅 是 为 了 控制 相应 的 成 员 变量 是 否 
有 效 而 已 。 例 如 ,用 户 在 程序 中 ， 需 要 使 用 到 该 结构 体 中 的 dwFillAttribute 成 员 。 
那么 ， 用 户 必 须 将 参数 dwFlags 取 值 为 STARTF USEFILLATTRIBUTE。 否 则 ， 


该 成 员 变量 将 无 效 。 


口 参数 IpProcessInformation 是 指向 结构 体 PROCESS_INFORMATION 的 指针 变量 。 


该 结构 体 声明 如 下 : 


typedef struct PROCESS INFORMATION 


{ 
HANDLE hpProcess; 
HANDLE hThread; 
DWORD dwProcessId; 
DWORD dwThreadId; 
} PROCESS INFORMATION; 


// 进 程 句柄 
// 线 程 句柄 
// 进 程 ID 
// 线 程 ID 


该 结构 体 主 要 用 于 保存 进程 的 相关 信息 。 其 他 参数 均 可 以 默认 设置 为 NULL。 例 如 ， 


调用 操作 系统 的 记事 本 程序 。 代 码 如 下 : 


STRARTUPINEO si={sizeof (si)}; 
PROCESS INFORMATION pi; 
CString *str="notepad”; 


// 省 略 部 分 代码 
// 定 义 结构 体 变量 
// 定 义 结构 体 对 象 
// 记 事 本 名 称 


CreateProcess (NULL, str, NULL, NULL, false, NULL, NULL, NULL, &si, gpi); 


// 调 用 函数 打开 记事 本 程序 
// 省 略 部 分 代码 


同样 的 道理 ， 用 户 在 本 例 中 ， 也 可 以 使 用 函数 CreateProcessO 调 用 邮件 收发 程序 。 代 


码 如 下 : 


STARTUPINFO si={sizeof (si)}; 
PROCESS INFORMATION pi; 


CString *str="mailto:lymlrl@163.com"; 


// 省 略 部 分 代码 
// 定 义 结构 体 变量 


// 打 开 邮 件 程序 的 系统 命令 


CreateProcess (NULL, str, NULL, NULL, false, NULL, NULL, NULL, &si, &pi); 


2. 使 用 ShellIExecute() 函 数 


// 调 用 函数 打开 记事 本 程序 
// 省 略 部 分 代码 


在 MFC 编程 中 , 除了 函数 CreateProcess0 以 外 , 还 可 以 调用 函数 ShellExecuteO 实 现 相 


同 的 功能 。 该 函数 原型 如 下 : 
HINSTANCE ShellExecutel( 

HWND hwnd, 
LPCTSTR lpOperation, 
LPCTSTR lpFile, 
LPCTSTR lpParameters, 
LPCTSTR lpDirectory, 
INT nshowCcmd 


.154 。 


// 父 窗口 句柄 

// 将 要 进行 的 操作 形式 

// 目 录 文件 名 称 或 文件 路 径 
// 传 递 的 参数 

// 一 般 为 NULL 

// 显 示 方 式 
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该 函数 执行 成 功 会 返回 调用 程序 的 应 用 程序 指针 ， 否 则 返回 错误 代码 。 部 分 错误 代码 
如 表 7.2 所 示 。 


表 7.2 部 分 错误 代码 


错误 代码 意 义 
ERROR FILE NOT FOUND 找 不 到 相应 文件 
ERROR PATH NOT FOUND 找 不 到 所 需 路 径 
ERROR PATH NOT FOUND 无 效 的 .exe 文件 
SE ERR ASSOCINCOMPLETE 无 效 的 文件 名 
0 操作 系统 的 内 存 溢出 


该 函数 的 各 个 参数 说 明 以 及 意义 已 经 在 第 5 章 的 5.4.3 节 中 讲述 ， 在 这 里 不 再 装 述 ， 
请 用 户 复 习 前 面 的 知识 点 。 使 用 该 函数 调用 操作 系统 自 带 的 邮件 发 送 程序 ， 代 码 如 下 : 


#include <stdio.h> // 调 用 相关 头 文件 
#include <windows .h> 
main () // 主 函数 

int i=07 // 定 义 循环 变量 

char ch; // 定 义 字符 ， 用 于 获取 用 户 输入 
printf ("确认 打开 邮件 收发 程序 ! (Y/N) \n") ; // 提 示 用 户 
scanf (gch); // 输 入 指令 
dElch ge vy // 判 断 输 入 指令 

printf ("邮件 收发 程序 正在 打开 ! 请 稍 候 ……\n");  // 提 示 用 户 


while(i<=10000000) 
{ 


1/ 循环， 模拟 计算 机 工作 


i+=1; 
} 
ShellExecute (NULL, NULL, "mailto:lymlr1@163.com", 
NULL, NULL, SW_SHOW) ; // 调 用 函数 启动 邮件 收发 程序 
printf ("邮件 收发 程序 已 经 打开 ， 请 使 用 ! \n"); 
} 


else 


printf ("谢谢 使 用 !\n"); }} 


以 上 代码 是 使 用 C 语言 编写 ， 并 且 使 用 命令 行 窗口 界面 ， 目 的 是 为 了 让 用 户 了 解 整个 
调用 过 程 。 在 随 书 光盘 的 第 7 章 中 附 有 代码 ， 请 用 户 自行 参考 。 此 段 代码 在 VC 中 编译 后 
的 结果 ， 如 图 7.4 所 示 。 用 户 在 运行 界面 1 中 输入 字符 Y 或 y， 然 后 按 下 Enter 键 。 程 序 提 
示 邮 件 程序 正在 打开 ， 当 邮件 程序 打开 以 后 ,实例 程序 会 提示 已 经 打开 邮件 程序 ， 如 图 7.5 
所 示 。 

县 注意 : 在 程序 中 为 了 模拟 计算 机 的 工作 ， 所 以 笔者 使 用 了 while 循环 产生 时 间 差 ， 仅 仅 
是 为 了 让 用 户 重复 了 解 该 调用 过 程 。 在 实际 编程 中 ， 不 提倡 使 用 该 方法 产生 时 间 
差 ， 因 为 这 种 方法 很 危险 ， 容易 造 成 系统 的 崩 演 。 通常 ， 使 用 多 线程 编程 的 方法 
比较 安全 , 也 是 笔者 极力 推荐 的 一 种 方法 .该 类 方法 将 在 后 面 的 相关 章节 中 讲述 。 
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图 7.5 运行 界面 2 


图 7.4 运行 界面 


7.2 ”SMTP 会 话 过 程 


SMTP 是 发 送 邮件 协议 ， 与 前 面 所 讲 的 FTP、HTTP 等 协议 一 样 被 用 作 某 种 行为 的 规 
范 标准 。 本 节 的 主要 内 容 就 是 向 用 户 讲解 邮件 客户 端 怎 么 连接 SMTP 服务 器 以 及 向 SMTP 
服务 器 发 送信 件 等 操作 。 


7.2.1 怎么 连接 服务 器 


在 网 络 中 传输 邮件 信息 都 是 基于 TCP/P 协议 的 ， 所 以 用 户 在 Windows 操作 系统 中 编 
写 邮 件 发 送 程序 时 可 以 使 用 Windows 套 接 字 来 完成 。 一 般 情 况 下 ,客户 端 连 接 服务 器 的 几 
个 步骤 如 下 。 

(1) 客户 端 以 指定 瑟 地 址 和 端口 连接 服务 器 。 

(2) 服务 器 收 到 连接 请 求 ， 并 同意 客户 端 连接 请 求 。 

(3) 客户 端 和 服务 器 互相 发 送 数据 

(4) 关闭 服务 器 和 客户 端的 套 接 字 。 

基于 以 上 几 个 步骤 ， 用 户 可 以 VC 中 编写 程序 实现 邮件 客户 端 。 


1. 创建 套 接 字 对 象 
该 实例 与 一 般 网 络 程序 一 样 ， 需 要 Windows 套 接 字 (SOCKET) 的 支持 ， 所 以 用 户 应 
该 首先 初始 化 套 接 字库 。 代 码 如 下 


BOOL CMYEMAIL: :OnInitDialog() 


// 省 略 部 分 代码 
DWORD ss=MAKEWORD (2,0); // 指 定 套 接 字 库 版 本 
::WSAStartup (ss, gdata); // 初 始 化 套 接 字 库 
// 省 略 部 分 代码 


“6s 
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用 户 初始 化 套 接 字 库 以 后 ， 还 必须 记得 在 程序 退出 之 前 释放 该 套 接 字库 。 代 码 如 下 : 
void CMyEMAIL: :OnClose () 


{ 
::WSACleanup () 7 // 释 放 已 经 加 载 的 套 接 字库 
| 


然后 ， 用 户 可 以 调用 API 函数 socketO 创 建 连接 服务 器 的 套 接 字 了 。 代 码 如 下 : 


BOOL CMVYEMRIL: :OnInitDialog() 


// 省 略 部 分 代码 

SOCKET s; // 定 义 套 接 字 对 象 
sockaddr in addr7 // 定 义 网 络 地 址 结构 对 象 
addr.sin family=AF INET7 // 为 地 址 结构 中 的 成 员 赋值 


addr.sin port=htons (25); 
addr.sin addr.S_un.S_addr=inet_addr (smtpip);  // 设 置 SMTP 服务 器 的 地 址 
s=: :socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); ”// 创 建 套 接 字 
// 省 略 部 分 代码 
在 代码 中 ,用户 设置 了 套 接 字 将 要 连接 服务 器 的 端口 号 码 是 25， 该 端口 是 标准 的 电子 
邮件 传输 端口 ,与 HTTP 协议 的 80 端口 一 样 。 函 数 socketO 创 建 了 基于 TCP 通信 的 流 式 套 
接 字句 柄 。 


2. 连接 服务 器 
用 户 创建 好 套 接 字 以 后 ， 可 以 调用 API 函数 connect0 连 接 服务 器 。 其 原型 如 下 : 


int connect ( 
SOCKET s, 
const struct sockaddr FAR* name, 
int namelen 
); 
该 函数 用 于 连接 远程 计算 机 ， 如 果 连 接 失 败 则 返回 -1， 否则 成 功 。 参数 及 其 意义 如 下 : 
口 参数 s 表示 将 要 连接 服务 器 的 套 接 字 句柄 ， 该 套 接 字 是 用 户 之 前 已 经 创建 好 的 套 
接 字 句柄 。 
口 参数 name 是 指向 套 接 字 地 址 结构 体 的 指针 变量 。 该 套 接 字 结构 体 声 明 如 下 : 
struct sockaddr in { 
short sin family; 
u short sin port; 
struct in addr sin addr; 
char sin zero[8]; 
}; 
该 结构 体 是 sockaddr 结构 的 扩充 结构 ， 一 般 被 用 在 Windows Socket 2 中 。 
口 参数 namelen 表示 套 接 字 结构 对 象 的 大 小 。 
使 用 该 函数 在 套 接 字 s 上 连接 SMTP 服务 器 。 例 如 ，SMTP 服务 器 地 址 为 
“mail.163.com”， 端 口 为 25。 代 码 如 下 : 


BOOL CMYyEMAIL: :OnInitDialog() 
汪 
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DWORD ss=MAKEWORD (2,0) 7 
: :WSAStartup(ss, &data); 
SOCKET s; 


hostent host; 
sockaddr in addr; 


addr.sin family=AF INET; 


| 


addr .sin port=htons (25); 
host=gethostbyname ("mail.163.com"); 


// 指 定 套 接 字库 版 本 
// 初 始 化 套 接 字库 

// 定 义 套 接 字 对 象 

// 定 义 主机 结构 体 对 象 
// 定 义 网 络 地 址 结构 对 象 


// 为 地 址 结构 中 的 成 员 赋值 
// 从 服务 器 名 获取 主机 地 址 


addr.sin addr.s un.s addr=inet addqr (host-> h addr list[0]); 


S=: :socket (AF_INET,SOCK STREAM,IPPROTO TCP); 
::connect(s, (sockaddr*) gaddr,sizeof (addr)); 


// 设 置 SMTP 服务 器 的 地 址 
// 创 建 套 接 字 

/ /连接 SMTP 服务 器 

// 省 略 部 分 代码 


通过 上 面 的 代码 ， 用 户 已 经 向 SMTP 服务 器 发 送 了 连接 请 求 。 当 服务 器 接受 客户 端的 
连接 请 求 以 后 ， 服 务 器 会 返回 相关 响应 码 给 客户 端 。 该 响应 码 的 前 3 位 数字 表示 服务 器 端 
响应 的 结果 。 部 分 SMTP 响应 码 如 表 7.3 所 示 。 


表 7.3 部 分 SMTP 响 应 码 


响 应 码 
220 
221 
250 
450 
421 
451 
452 
500 
501 
502 
503 
550 
552 
553 
554 
334 
235 


意义 
服务 器 就 绪 
服务 器 关闭 传输 通道 
客户 端 所 请 求 的 邮件 操作 完成 
邮件 地 址 不 可 用 


服务 器 服务 不 可 用 ， 关 闭 传输 通道 

由 于 处 理 过 程 中 出 错 ， 请 求 的 操作 被 终止 
服务 器 存储 空间 不 足 
SMTP 命令 语法 错误 
命令 参数 的 语法 错误 

命令 暂时 不 可 实现 

错误 的 命令 序列 

客户 端 请 求 的 操作 不 能 被 执行 或 者 邮件 地 址 不 可 用 
服务 器 的 存储 不 足 

邮箱 名 称 不 合法 

服务 失败 

发 送 验证 用 户 名 

验证 账号 密码 失败 


在 该 实例 中 ,客户 端 如 果 连 接 服务 器 成 功 则 会 返回 响应 码 220， 表 示 服 务 器 服务 就 绪 ， 


否则 返回 


char recvbuff[3]={0}; 
sockaddr in addr; 
addr .sin family=AF INET; 


4 


addr .sin port=htons (25); 


554。 客 户 端 接收 响应 码 应 该 调用 API 函数 recv()。 代 码 如 下 : 


BOOL CMYyEMAIL: :OnInitDialog() 
{ 


// 省 略 部 分 代码 
// 定 义 接收 缓冲 区 
// 定 义 网 络 地 址 结构 对 象 
// 为 地 址 结构 中 的 成 员 赋值 
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host=gethostbyname ("mail.163.com"); // 从 服务 器 名 获取 主机 地 址 
addr.sin addr.S un.S addr=inet addr (host-> h addr 1ist[0]); 
// 设 置 SMTP 服务 器 的 地 址 


s=: :socket (AF INET, SOCK STREAM,IPPROTO TCP);  // 创 建 套 接 字 
if(connect(s，(sockaddr*) gaddr,sizeof(addr))) // 连 接 SMTP 服务 器 
{ 
recv (s, (LPSTR) recvbuff, 3,0); // 接 收 响应 码 前 3 位 数字 
if(recvbuff[0]==220) 
{ 


MessageBox ("服务 器 启动 服务 就 绪 ! 请 继续 操作 ! ") ; ”/ /提示 用 户 服 务 器 就 绪 
} 


, 


本 节 中 ， 向 用 户 讲述 了 连接 SMTP 服务 器 、SMTP 响应 码 的 具体 意义 以 及 客户 端 接 收 
响应 码 ， 并 且 配 有 相关 的 代码 实例 。 


7.2.2 SMTP 命令 


在 客户 端 与 SMTP 服务 器 之 间 进 行 数据 传输 时 ， 双 方 都 是 使 用 SMTP 命令 进行 交流 。 
因此 ，SMTP 命令 在 E-mail 通信 中 起 着 很 重要 的 作用 。 但是， 在 向 用 户 讲 解 SMTP 命令 之 
前 ， 用 户 必 须 首先 了 解 一 下 电子 邮件 的 基本 格式 。 


1. E-mail 构造 格式 


在 SMTP 协议 中 , 规定 了 E-mail 信件 的 基本 格式 。 该 格式 与 第 5 章 中 向 用 户 所 讲述 的 
HTTP 基本 格式 一 样 ， 都 包含 有 数据 头 和 数据 体 ， 并 且 在 两 者 之 间 均 使 用 一 个 空白 行 隔 开 。 
例如 ， 一 封 简单 的 邮件 构造 格式 如 下 : 

Data:Tue, 04 Feb 2009 21:18:03+0800 // 邮 件 头 

From:lymlr1@163.com 

To:lymlrl@126.com 

Subject: This is a E-mail 

// 空 白 行 

Hello lymlrl! // 邮 件 体 


This is a E-mail! 

在 例子 中 ，E-mail 的 基本 格式 包括 邮件 头 和 邮件 体 。 邮 件 头 中 的 内 容 是 关于 该 邮件 的 
一 些 基本 信息 。 例 如 ， 邮 件 发 送 的 时 间 、 发 送 者 以 及 接收 者 等 基本 信息 。 而 邮件 体 中 是 纯 
文本 的 邮件 内 容 ， 并 且 在 SMTP 协议 中 ， 还 规定 在 邮件 头 和 邮件 体 之 问 需 要 使 用 一 个 空白 
行 隔 开 。 

在 邮件 头 中 ， 主 要 是 由 SMTP 标准 字段 组 成 ， 这 些 字段 包含 邮件 的 基本 信息 。 例 如 : 


Data:Tue,04 Feb 2009 21:18:03+0800 // 邮 件 头 
From: lymlr1@163.com 

To:lymlrl@126.com 

Subject: This is a E-mail 


以 上 字段 所 包含 的 信息 是 邮件 被 操作 的 时 间 ， 即 2009 年 2 月 4 日 星期 三 ， 邮 件 发 送 
者 的 邮件 地 址 是 lymlrl@163.com， 邮 件 发 送 目 的 地 是 lymll@126.com， 邮 件 主题 是 This is 
a E-mail。 在 SMTP 协议 中 ， 包 含 了 很 多 邮件 头 标准 字段 ， 部 分 SMTP 邮件 头 字段 如 表 7.4 
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所 示 。 紧 跟着 邮件 头 的 是 一 个 空白 行 ， 用 于 区 分 邮件 头 和 邮件 体 。 在 邮件 体 中 ， 主 要 是 邮 
件 需要 发 送 的 信息 内 容 。 在 邮件 体 中 ， 不 包含 任何 字段 信息 ， 只 有 文本 格式 的 邮件 内 容 
而 已 。 


表 7.4 SMTP 邮 件 头 字 段 


字 段 意 义 
From 邮件 创建 者 的 邮件 地 址 
To 邮件 目的 地 
Sender 邮件 发 送 者 
Reply-to 邮件 回复 地 址 
Ce 邮件 抄 送 人 
In- Reply-To 邮件 正 被 回复 
Data 邮件 创建 的 时 间 
Subject 邮件 主题 
Comments 邮件 的 其 他 说 明 
Keywords 邮件 的 关键 字 
Bcc 邮件 的 密 件 抄 送 人 邮件 地 址 
Message-ID 邮件 的 标识 符 


在 表 7.4 中 列 出 了 部 分 SMTP 标准 字段 。 其 中 ，From 表示 邮件 的 创建 者 地 址 ， 该 地 址 
在 一 般 情 况 下 仅 有 一 个 。Sender 表示 邮件 的 发 送 者 ， 该 发 送 者 可 能 是 转发 邮件 ， 该 字段 可 
以 有 多 个 邮件 地 址 ， 地 址 之 间 使 用 逗号 隔 开 。 同 时 可 以 有 多 个 地 址 的 字段 是 To。 例 如 ; 
Data:Tue,04 Feb 2009 21:18:03+0800 


From:lymlrl@163.com 
Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina.com.cn 


// 发 送 者 为 多 个 地 址 
To:lymlr1@126.com, data@yahoo.com.cn,asj@sina.com.cn // 接 收 者 也 为 多 个 
Subject: This is a E-mail // 邮 件 主题 
Hello lymlrl! // 邮 件数 据 体 


This is a E-mail! 

如 果 邮 件 没有 没有 发 送 成 功 ， 则 客户 端 应 该 将 该 邮件 重新 进行 发 送 。 邮 件 的 重 发 必须 
在 保证 邮件 内 容 不 发 生 改 变 的 情况 下 进行 。 实 际 上 ， 邮 件 进行 重 发 只 用 在 原 有 邮件 头 的 标 
题字 段 前 加 上 字符 串 “Resent”。 例 如 ， 将 上 述 实例 中 的 邮件 进行 重 发， 内 容 如 下 ; 

Resent-Data:Tue,04 Feb 2009 21:18:03+0800 


Resent-From:lymlrl1@163.com 
Resent-Sender: lymlrl1@126.com，wexs@163.com,wen@126.com// 发 送 者 为 多 个 地 址 


Resent-To:lymlr1@126.com, data@yahoo.com.cn // 接 收 者 也 为 多 个 
Resent-Subject: This is a E-mail // 邮 件 主题 
Hello lymlrl! // 邮 件数 据 体 


This is a E-mail! 


名 注意 : 在 连接 SMTP 服务 器 成 功 以 后 ， 客 户 端 在 接收 到 服务 器 返回 的 DATA 命令 后 ， 
就 可 以 将 以 上 构造 的 邮件 内 容 发 送 到 SMTP 服务 器 了 。 
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2. SMTP 命 令 


前 面 已 经 向 用 户 介 绍 过 客户 端 与 SMTP 服务 器 之 间 的 交流 是 通过 SMTP 命令 来 完成 
的 。 常 见 的 SMTP 命令 如 表 7.5 所 示 。 
表 7.5 常用 SMTP 命 令 

命 令 含 义 
HELO 客户 机 向 服务 器 问候 
MAIL 指定 邮件 的 发 送 者 
RCPT 指定 邮件 的 接收 者 
DATA 指示 客户 端 或 服务 器 端 可 以 发 送 邮 件 内 容 
RSET 重新 初始 化 会 话 状态 
SEND 指定 邮件 的 发 送 者 
VRFY 验证 邮件 地 址 的 有 效 性 
NOOP 空 操 作 
QUIT 终止 会 话 
TURN 交换 服务 器 与 客户 端 


下 面 将 参照 表 7.3 中 所 列举 的 部 分 SMTP 命令 进行 讲解 。 


口 


命令 HELO 是 在 邮件 客户 端 连接 服务 器 成 功 以 后 ， 第 一 个 发 送 到 服务 器 的 命令 。 


其 作用 是 向 SMTP 服务 器 问候 。 例 如 ， 客 户 端 向 服务 器 问候 并 表明 自己 的 身份 。 


内 容 如 下 : 
HELO lymlrl<crlf> 


其 中 ， 字 符 <crl 亿 表示 结束 符号 。 


以 上 内 容 表示 客户 端 向 服务 器 问候 并 且 表 明 自 己 的 


身份 。 例 如 ， 在 VC 中 向 服务 器 发 送 该 命令 ， 代 码 如 下 : 


char sendmail[]={"HELO lymlrl\r\n"}; 
send(s, sendmail,sizeof (sendmail),0); 


// 省 略 部 分 代码 

// 构 造 命令 字符 串 
// 发 送 命令 到 服务 器 
// 省 略 部 分 代码 


口 命令 MAIL/ RCPT 分 别 表示 指定 邮件 的 发 送 和 接收 者 。 例 如 : 
MAIL from:lymlrl@163.com<crlf> 


RCPT To:lymlrl@126.com<crlf> 


上 述 代 码 分 别 指定 了 邮件 的 发 送 者 和 接收 者 的 邮件 地 址 。 
口 命令 DATA 是 客户 端 发 送 到 服务 器 表明 客户 端 将 要 发 送 邮 件 到 服务 器 。 服 务 器 收 
到 该 命令 后 会 返回 SMTP 响应 码 到 客户 端 ， 表 示 服 务 器 已 经 准备 好 接收 客户 端的 


邮件 数据 。 


命令 VRFY 是 被 用 来 验证 某 个 邮件 地 址 的 有 效 性 。 例 如 ， 用 户 用 该 命令 来 验证 自 


己 的 邮箱 地 址 是 否 有 效 , 则 可 以 发 送 命 令 字符 串 “VRFY:lymlrl@163.com” 到 SMTP 


服务 器 。 如 果 该 邮箱 地 址 是 有 效 的 地 址 ， 则 服务 器 会 返回 


所 请 求 的 操作 成 功 ， 否 则 返回 


代码 如 下 : 


响应 码 250， 表示 客户 端 
450， 表 示 邮 件 地 址 无 效 。 


命令 QUIT 表示 终止 服务 器 和 客户 端的 会 话 。 例 如 客户 端 向 服务 器 发 送 该 命令 ， 
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Se // 省 略 部 分 代码 

char sendmail[]={"QUIT\r\n"}; // 构 造 命令 字符 串 

send(s, sendmail,sizeof(sendmail),0); // 发 送 命 令 到 服务 器 

县 // 省 略 部 分 代码 

当 服 务 器 接收 到 该 命令 以 后 ， 会 返回 响应 码 220 到 客户 端 ， 表 示 服 务 器 已 经 关闭 相关 


的 数据 通道 。 
口 命令 SEND 命令 被 用 来 指定 邮件 的 发 送 者 ， 在 这 里 发 送 可 以 包括 邮件 的 创建 者 或 
转发 者 。 邮 件 的 创建 者 只 能 为 唯一 ， 而 转发 者 可 以 有 多 个 。 例 如 ， 有 一 封 邮件 是 
由 笔者 所 创建 ， 被 某 个 用 户 所 转发 ， 该 用 户 的 邮件 地 址 是 wsds@126.com， 那 么 响 


应 的 代码 如 下 : 
ee // 省 略 部 分 代码 
char sendmail[]={"SEND:wsdsel26.com\r\n"}; // 构 造 命令 字符 串 
send(s，sendmail,sizeof(sendmail),0)7 // 发 送 命令 到 服务 器 
Se // 省 略 部 分 代码 


服务 器 接收 到 该 命令 后 ， 会 返回 响应 码 250 表示 成 功 。 


入 注意 : 表 7.5 中 的 命令 在 程序 中 被 发 送 时 必须 加 上 换行 符号 “rn”， 或 者 用 户 在 构造 完 
成 整个 邮件 内 容 后 ， 需 要 在 邮件 内 容 后 面 加 上 “\0”， 表 示 数 据 内 容 发 送 或 者 接 


收 完毕 。 


3. 构造 邮件 实例 程序 


下 面 将 引导 用 户 结合 前 面 所 讲 的 知识 构造 一 封 简单 的 邮件 ， 并 编写 程序 将 其 发 送 到 
SMTP 服务 器 。 首 先 ， 构 造 邮 件 格式 如 下 : 

Data:Tue,04 Feb 2009 21:18:03+0800 

From:lymlr1@163.com 

Reply-to:lymlrl@sina.com.cn // 回 复 邮 件 地 址 


Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina.com.cn 
To:lymlrl1@126.com, data@yahoo.com.cn,asj@sina.com.cn 


subject: 新 年 快乐 ! // 邮 件 主题 


祝 大 家 新 年 快乐 ! // 邮 件 体 
程序 员 俱乐部 1Ymlr1 


然后 ， 在 VC 中 编写 代码 发 送 该 邮件 ， 代 码 如 下 : 


BOOL CMVYEMRAIL : :OnInitDialog() 
{ 


本 // 省 略 部 分 代码 
char recvbuff[3]={0}; // 定 义 接收 缓冲 区 
sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 
adqr .sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin_ port=htons (25); 

host=gethostbyname ("mail.163.com"); // 从 服务 器 名 获取 主机 地 址 
addr.sin addr.s un.S addr=inet addr (host-> h addr list[0]); 

// 设 置 SMTP 服务 器 的 地 址 

s=: :socket (AF_INET, SOCK_STREAM, IPPROTO TCP); // 创 建 套 接 字 


if(connect(s， (sockaddr*) &addr,sizeof (addr))) // 连 接 SMTP 服务 器 
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| 
recv (s, (LPSTR) recvbuff, 3,0); // 接 收 响应 码 前 3 位 数字 
if(recvbuff[0] 一 220) // 提 示 用 户 服务 器 就 绪 

这 
CString data="Data: Tue,04 Feb 2009 21:18:03+0800\rNn"7 / /构造 发 送 字 符 串 
CString from="MAIL FROM:lymlrl@163.com\r\n"; 
CString reply=" Reply-to:lymlrl@sina.com.cn\r\n"; 
CString send=" Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina. 
com.cn\r\n™; 
CString to=" RCPT TO:lymlrl@126.com,data@yahoo.com.cn,asj@sina.com.cn\r\n"; 
CString subject="” Subject: 新 年 快乐 ! "7 
Cstring text="” 祝 大 家 新 年 快乐 ! \r\n"; 
text+=" 程 序 员 俱 乐 部 lymlrl\r\n"; 
char sendmessage[]={data.GetBuffer(1), 

from.GetBuffer (1) ,reply.GetBuffer (1), 
send.GetBuffer (1), to.GetBuffer (1), 
"DATA\r\n", subject.GetBuffer(1), 
Text .GetBuffer (1), "QUIT\r\n", "\0" 


send(s,& sendmessage,sizeof (sendmessage),0); 


MessageBox ("邮件 发 送 成 功 ! "); 
. 


} 

} 

上 面 的 代码 中 ， 首 先 使 用 套 接 字 连 接 SMTP 服务 器 ， 连 接 成 功 后 ， 调 用 函数 接收 服务 
器 的 响应 。 如 果 该 响应 码 为 220， 则 表示 服务 器 准备 就 绪 ， 客 户 端 可 以 发 送 邮件 到 服务 器 。 
接着 ， 客 户 端 构造 邮件 内 容 。 在 向 服务 器 发 送 邮件 实际 内 容 之 前 ， 应 首先 发 送 “DATAND” 
通知 服务 器 准备 接收 数据 。 邮 件 内 容 发 送 完毕 以 后 还 需要 向 服务 器 发 送 “QUITwm ”表示 
全 注意 : 在 构造 邮件 时 ， 在 每 句 字段 完成 后 均 加 上 “Am”， 并 且 在 整个 邮件 构造 完毕 以 

后 需要 加 上 字符 “\0”， 表 示 发 送 的 数据 结束 。 


7.2.3 发送 命 令 与 接收 响应 


在 客户 端 编 程 中 ,通常 情况 下 客户 端 都 是 通过 向 SMTP 服务 器 发 送 命令 表示 需要 进行 
的 操作 。 在 表 7.5 中 ， 已 经 列 出 了 部 分 SMTP 常用 命令 ， 这 些 命令 都 是 在 客户 端 连接 服务 
器 成 功 以 后 发 送 的 。 客 户 端 发 送 命令 以 后 ， 服 务 器 通过 向 客户 端 发 送 SMTP 响应 码 告知 其 
所 发 送 的 命令 是 否 成 功 或 被 执行 。 


1. 邮件 发 送 与 接收 


客户 端 与 SMTP 服务 器 的 通信 过 程 是 通过 问答 形式 完成 的 ， 这 个 过 程 是 典型 的 C/S 通 
信和 模式 。 下 面 介绍 一 下 邮件 客户 端 发 送 的 命令 与 服务 器 端 返回 的 信息 。 内 容 如 下 : 


Connect sever // 连 接 服务 器 
220 5. // 服 务 器 就 绪 
HELO lymlrl 

250 hello lymlrl,Welcome! // 服 务 器 回应 
MAIL FROM:1ymlr1@163.com // 指 定 邮件 发 送 者 
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250 (from 1Ymlrle163.com) ,sender accepted // 服 务 器 回应 

RCPT TO:lymlrl@126.com,lymlrl@sina.com.cn // 指 定 邮件 接收 者 

250 (lymlrl@126.com,lymlrl@sina.com.cn),oOK 

DATA // 表 示 即 将 发 送 邮 件 内 容 
354 please input mail // 服 务 器 回应 
客户 端 发 送 邮 件 内 容 

250 OK, the message is saved // 服 务 器 接收 邮件 内 容 完毕 
QUIT // 客 户 端 退出 


221 BYEBYE,SEE YOU 


通过 上 面 的 内 容 ， 用 户 可 以 看 到 这 是 发 送 邮件 所 要 经 历 的 一 个 典型 的 C/S (客户 端 / 服 
务 器 ) 通信 过 程 ， 通 过 问答 的 形式 将 一 封 邮件 发 送 到 服务 器 。 


外 注意 : 在 客户 端 发 送 DATA 命令 以 后 , 服务 器 会 返回 是 否 准备 好 接收 客户 端 将 要 发 送 邮 
件 的 响应 码 ， 该 响应 码 是 334， 表 示 服 务 器 已 经 准备 好 接收 邮件 。 接 下 来 ， 客 户 
端 可 以 直接 将 邮件 发 送 到 服务 器 。 在 上 面 的 内 容 中 ,单数 行 是 客户 端 发 送 的 命令 
或 操作 ， 双 数 行 是 服务 器 返回 的 响应 码 。 


2. 发 送 SMTP 命 令 


在 实例 中 , 客户 端 发 送 命令 是 通过 MFC 函数 sendO 进 行 的 。 该 函数 的 作用 是 向 套 接 字 
的 另 一 方 发 送 指定 缓冲 区 中 的 内 容 。 函 数 原型 如 下 : 


int send(SOCKET s,const char* buff,int len,int flags); 


该 函数 调用 成 功 返 回 非 0 值 ， 否 则 失败 。 部 分 参数 意义 如 下 : 

口 参数 s 表示 客户 端 所 创建 的 套 接 字句 柄 。 

口 参数 bu 任 指向 缓冲 区 的 字符 指针 。 

口 参数 len 表示 缓冲 区 的 大 小 ， 可 以 使 用 函数 sizeofO 获 得 。 

例如 ， 用 户 使 用 函数 send0 将 命令 DATA 发 送 到 服务 器 ， 代 码 如 下 : 


char *send; 


CString str="DATA\r\n"; // 定 义 命令 字符 串 
sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 
adqr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin port=htons (25); 
host=gethostbyname ("mail.163.com"); // 从 服务 器 名 获取 主机 地 址 
addr.sin addr.S un.S addr=inet addr (host-> h addr list[0]); 
// 设 置 SMTP 服务 器 的 地 址 


s=: :socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); ”// 创 建 套 接 字 
if(connect(s， (sockaddr*) &addr,sizeof (addr))) // 连 接 SMTP 服务 器 


recv (s, (LPSTR) recvbuff, 3,0); // 接 收 响应 码 前 3 位 数字 
if (recvbuff[0]==220) // 提 示 用 户 服务 器 就 绪 
Ui 
send=str.GetBuffer (1); // 获 取 字符 串 首 地 址 
send(s, &send, sizeof (send) ,0); // 发 送 字符 串 


} 
实例 程序 中 ， 用 户 首 先 发 送 连接 请 求 到 服务 器 并 且 等 待 服务 器 的 响应 。 如 果 服 务 器 返 
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回 的 响应 码 是 220， 则 表示 服务 器 接受 客户 端的 请 求 并 准备 就 绪 。 接 着 ， 客 户 端 便 可 以 将 
命令 字符 串通 过 套 接 字 发 送 到 服务 器 执行 。 


3. 接收 邮件 服务 器 响应 


客户 端 接收 的 消息 来 自 于 服务 器 端 返回 的 响应 码 。 实 现 该 功能 的 函数 是 recvO， 该 函 
数 原型 如 下 : 


int recv(SOCKET s,const char* buff,int len,int flags); 


该 函数 调用 成 功 ， 则 返回 实际 接收 到 的 字符 数 ， 否 则 失败 。 主 要 参数 意义 如 下 : 

口 参数 s 套 接 字句 柄 。 

口 参数 buff 表示 接收 数据 的 缓冲 区 指针 ， 与 函数 send0 一 样 。 

口 参数 len 表示 将 接收 的 数据 大 小 。 在 这 里 将 该 参数 设置 为 3。 

用 户 在 编写 客户 端 程 序 时 ， 主 要 是 接收 服务 器 响应 码 的 前 3 位 数字 。 所 以 ， 用 户 在 使 
用 函数 recv0O 接 收 消息 时 ， 字 符 长 度 固定 为 3 即 可 。 代 码 如 下 : 


7/ 省 略 部 分 代码 
if(connect(s, (sockaddr*) &addr, sizeof (addr))) // 连 接 SMTP 服务 器 
b recv (s, (LPSTR) recvbuff, 3,0); // 接 收 响应 码 前 3 位 数字 
// 省 略 部 分 代码 


在 这 里 ， 关 于 客户 端 接收 服务 器 响应 消息 的 功能 不 再 进行 重复 讲述 ， 请 用 户 复习 本 章 
前 面 所 讲述 的 相关 内 容 。 


7.3 发 送 邮 件 


用 户 通过 学 习 前 面 关 于 邮件 收发 的 基本 原理 和 编程 方法 ， 对 邮件 收发 器 的 制作 已 经 熟 
悉 。 在 本 节 中 ， 将 通过 编程 制作 程序 实例 ， 向 用 户 讲述 在 VC 环境 下 编程 的 具体 方法 。 通 
过 本 节 实例 的 学 习 ， 用 户 可 以 仿照 该 实例 的 设计 方法 ， 自 行 编程 实现 邮件 收发 器 。 


7.3.1 界面 设计 


在 任何 程序 中 ， 窗 口 界面 都 是 最 重要 的 ， 因 为 程序 界面 直接 面向 用 户 。 当 用 户 第 一 次 
使 用 软件 时 ， 其 窗口 界面 决定 了 用 户 对 该 软件 的 第 一 印象 。 所 以 在 本 实例 中 ， 程 序 窗口 设 
计 是 基于 对 话 框 模式 。 用 户 可 以 在 VC 对 话 框 资源 编辑 器 中 ， 通 过 鼠标 拖 动 控件 等 方法 设 
计 一 个 个 性 化 的 窗口 界面 ， 然 后 编程 实现 其 功能 。 

1. 设计 界面 


用 户 在 VC 中 ， 可 以 使 用 工程 向 导 创建 程序 实例 。 基 本 步骤 如 下 : 
(1) 选择 “文件 ” |“ 新建 ”命令 ， 打 开 “ 新 建 ”对 话 框 ， 如 图 7.6 所 示 。 
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文件 工程 | 工作 区 | 其 文档 | 


ATLCOM AppWizard 工程 名 称 叫 : 
回 cluster Resource Type Wizard 邮件 收发 器 
YC 


Dat 

医 DevStudio Addin Wizard 位 置 g: 
SS Extended Stored Proc Wizard CADOCUMENTS AND SETTINGS | 
SAPI Extension Wizard 
可 Makefile 

全 MFC ActiveX ControlWizard 

辐 MFC AppWizard [dl 创建 新 的 工作 空间 四 

人头 加 到 当 上 


空间 内 
New Database Wizard 
Utility Project 

回 win32 Application 

口 win32 Console Application 

[Win32 DynamicLink Library 

S| Win32 Static Library 


厂 人 属于 四) 


图 7.6 “新 建 ” 对 话 框 


(2) 在 “新 建 ” 对 话 框 中 ， 用 户 在 工程 选项 卡 中 指定 创建 MFC 应 用 程序 ， 在 工程 名 
称 中 设置 为 “邮件 收发 器 ”。 然 后 单 击 “确定 ”按钮 ， 进 入 下 一 步 设置 ， 如 图 7.7 所 示 。 


FC 应 用 程序 向 导 


您 的 资源 使 用 的 语言 是 : 
中 文 [中 国 ] APPWZCHS.DLU - 


5 上 水 完成 取消 


图 7.7 选择 “基本 对 话 框 ” 单 选 按钮 


(3) 由 于 本 实例 是 基于 对 话 框 的 , 所 以 在 步骤 1 中 , 将 创建 的 应 用 程序 类 型 指定 为 “ 基 
本 对 话 框 ”。 单 击 “ 下 一 步 ”按钮 ， 进 入 步骤 2， 如 图 7.8 所 示 。 

(4) 在 步骤 2 对 话 框 中 ， 为 项 目 选择 支持 Windows 套 接 字 。 如 果 用 户 在 这 里 没有 选择 
支持 套 接 字 功 能 ， 那 么 ， 还 可 以 在 程序 中 加 入 相关 代码 支持 套 接 字 功能 ， 有 具体 添加 方法 将 
在 后 面 的 编程 中 介绍 。 单 击 “ 下 一 步 ” 按钮 继续 设置 。 跳 过 步骤 3 进入 最 后 一 步 ， 如 图 7.9 


*166°* 


第 7 章 ”邮件 收发 器 


您 是 否 希望 包含 : 
订 "类 于 "对 话 杠 
厂 上 下 文 相关 帮助 
应 3D 外观 
您 希望 包 言 什么 其 他 支持 ? 
三 自动 操作 中 
F ActiveX 控件 四 


您 希望 包含 WOSA 支持 吗 ? 
Windows Sockets [W] 


对 话 框 的 标题 是 ; 
印 件 收发 习 


图 7.8 选择 Windows Sockets 复 选 框 


了 IFC 应 用 程序 向 导 - 步 枝 4 共 4 步 


应 用 程序 向 导 为 您 创建 了 以 下 类 : 
CMyAp 
CMyDIg 


类 名 四 : 
CMyApp 
基 类 : 


EwinApp 


图 7.9 完成 设置 


(5) 在 最 后 一 步 中 ， 用 户 可 以 在 列表 中 单 击 该 工程 中 的 类 名 ， 查 看 关于 该 类 相关 文件 
的 信息 。 如 单 击 CMyDlg 类 ， 将 会 显示 该 类 的 类 名 、 头 文件 名 、 执 行文 件 名 等 信息 ， 如 图 
7.10 所 示 。 

用 户 仅 需 要 单 击 “ 完 成 ”按钮 ， 便 可 以 完成 该 工程 的 相关 设置 ， 并 返回 到 VC 主 界面 。 


2. 添加 控件 


在 VC 资源 管理 器 中 编辑 默认 界面 ， 如 图 7.11 所 示 。 在 默认 界面 中 添加 所 需 控件 ， 控 
件 ID 以 及 作用 如 表 7.6 所 示 。 
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应 用 程序 向 导 为 您 创建 了 以 下 类 : 
EY 
类 名 [CJ]: 头 文件 四: 

cMyDlg 邮件 收发 露 Dig 

基 类 : 执行 文件 四 : 

[ 邮件 收发 器 DIg.cpp 


图 7.11 VC 工程 默认 界面 


用 户 在 默认 界面 中 应 首先 删除 默认 界面 上 的 按钮 以 及 静态 文本 等 。 如 果 需 要 调整 实例 
窗口 的 大 小 ， 可 以 直接 使 用 鼠标 拖拉 或 者 是 在 后 面 的 程序 中 编写 相应 的 代码 加 以 实现 。 


表 7.6 控件 ID 以 及 作用 


"168。 


控件 了 D 作 用 
IDC_SENDER 邮件 发 送 者 的 邮件 地 址 
IDC RECVER 邮件 接收 者 的 邮件 地 址 
IDC_SUBJECT 邮件 主题 
IDC PEIZHI SMTP 服务 器 配置 
IDC_SENDMAIL 发 送 邮件 按钮 
IDC RECVMAIL 接收 邮件 按钮 
IDC_ HELP 帮助 按钮 
IDC MAILTEXT 邮件 内 容 


第 7 章 ”邮件 收发 器 


用 户 在 VC 默认 界面 中 添加 表 7.6 中 所 示 的 控件 ， 并 调整 各 个 控件 的 位 置 以 及 大 小 。 
添加 并 调整 控件 后 的 程序 初始 界面 如 图 7.12 所 示 。 


图 7.12 调整 控件 后 的 程序 初始 界面 

用 户 可 以 看 到 调整 控件 的 位 置 与 大 小 以 后 ， 程 序 的 界面 显得 非常 整齐 、 流 畅 。 但 是 ， 
程序 窗口 启动 时 ， 使 用 者 可 能 并 不 知道 如 何 去 使 用 该 软件 ， 所 以 作为 程序 员 应 该 对 使 用 者 
的 使 用 进行 引导 。 如 ， 应 该 首先 进行 SMTP 相关 设置 ， 再 进行 邮件 相关 的 操作 。 实 现 这 类 
功能 ， 用 户 需要 在 程序 初始 化 时 进行 编程 实现 。 


7.3.2 界面 初始 化 代码 


程序 界面 初始 化 时 需要 将 软件 相关 信息 显示 给 用 户 。 所 以 ， 在 本 实例 程序 中 ， 同 样 需 
要 显示 一 些 关于 程序 使 用 方面 的 帮助 信息 给 用 户 参考 。 在 本 节 中 ， 将 向 用 户 讲解 初始 化 界 
面 的 相关 知识 。 

1 初始 化 界面 

当 实例 窗口 第 一 次 启动 时 ， 程 序 应 该 在 窗口 中 创建 状态 栏 用 于 显示 一 些 提示 信息 。 因 
此 ， 在 程序 初始 化 函数 中 创建 状态 栏 并 显示 软件 信息 等 。 代 码 如 下 : 


class CMVYD1g : public CDialog 
{ 


public: 
HWND statu; // 定 义 状态 栏 对 象 

A // 省 略 部 分 代码 
} 
BOOL CMyD1g::OnInitDialog() / /程序 初始 化 函数 
‘ 

CDialog::OnInitDialog () // 调 用 基 类 的 初始 化 函数 

statu=: :CreateStatusWindow (WS_CHILD|WS_VISIBLE, "欢迎 使 用 本 软件 ! (作者 : 
Liangwei)", this->m hWnd, IDC 123); // 创 建 状态 栏 ，ID 号 码 为 IDC_123 


this->SetWindowText ("邮件 收发 器 v1.0") ; ”// 设 置 窗口 标题 
// this->SetTitle ("邮件 收发 器 v1.0"); 
return TRUE; 

} 


“eye 


第 2 篇 Visual C++ 网 络 编程 典型 应 用 


添加 代码 时 , 首先 调用 函数 CreateStatusWindow0 为 实例 程序 创建 一 个 状态 栏 并 返回 状 
态 栏 句柄 ， 在 该 状态 栏 上 显示 程序 的 相关 信息 ， 状 态 栏 的 ID 号 码 设置 为 DC_123。 然 后 
调用 SetWindowText0 或 者 SetTitle0 函 数 将 实例 窗口 的 标题 设置 为 “邮件 收发 器 v1.0”， 
标题 包含 了 程序 版 本 号 。 最 后 在 文件 “邮件 收发 器 rc” 中 ， 定 义 状态 栏 的 IDpP。 代 码 如 下 : 

#define IDC 123 1008 

另外 ， 为 了 让 用 户 首先 查看 该 程序 的 使 用 方法 ， 应 当 在 程序 初始 化 时 ， 除 了 “使 用 前 


查看 ”按钮 处 于 可 用 状态 之 外 ， 其 他 按钮 应 该 全 部 禁用 。 在 程序 窗口 初始 化 函数 
CMyDlg::OnInitDialog0 中 添加 代码 如 下 : 


BOOL CMyD1g::OonInitDialog() // 程 序 初始 化 函数 
人 // 省 略 部 分 代码 
GetDlgItem(IDC SENDER)->EnableWindow (false); // 设 置 各 个 控件 状态 


GetDlgItem(IDC RECVER)—>EnableWindow (false); 
GetDlgItem(IDC SUBJECT)->EnableWindow (false); 
GetDlgItem(IDC PEIZHI)->EnableWindow (false); 
GetDlgItem(IDC SENDMAIL)->EnableWindow (false); 
GetDlgItem(IDC RECVMAIL)->EnableWindow (false); 
GetDlgItem(IDC MAILTEXT)->EnableWindow (false); 
GetDlgItem(IDC_SENDER) ->SetWindowText ("请 用 户 首先 查看 ' 使 用 前 须知 '! ") ; 
// 设 置 提示 信息 
a // 省 略 部 分 代码 
} 


全 注意 在 程序 中 使 用 SetWindowTextO 函 数 设置 控件 等 标题 时 ， 如 果 需 要 将 某 一 段 文 字 
括 上 ， 那 么 不 能 再 使 用 双 引 号 ， 只 能 使 用 单 引 号 。 因 为 在 VC 环境 下 ， 在 双 引 号 
中 再 使 用 该 符号 ， 编 译 器 会 报错 。 


运行 以 上 代码 ， 会 使 窗口 内 〈 除 了 “使 用 前 须知 ”按钮 ) 的 全 部 控件 都 处 于 禁用 状态 ， 
如 图 7.13 所 示 。 


邮件 收发 器 v1. 0 


图 7.13 控件 处 于 禁用 状态 
用 户 从 图 7.13 中 可 以 看 到 ， 界 面 中 的 控件 均 处 于 禁用 状态 。 如 果 用 户 需要 继续 使 用 该 
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程序 则 必须 按照 编程 者 的 引导 步骤 进行 使 用 。 在 这 里 ， 主 要 为 了 方便 向 用 户 讲解 程序 运行 
的 原理 才 设 置 了 引导 步骤 。 


2. 添加 消息 响应 函数 


为 了 实现 引导 步骤 ， 用 户 需要 为 “使 用 前 须知 ”按钮 添加 消息 响应 函数 ， 在 该 函数 中 
实现 引导 使 用 者 的 功能 。 添加 响应 函数 的 方法 是 在 VC 主 界面 中 , 使 用 键盘 上 的 Ctrl+W 组 
合 键 ， 弹 出 MFC ClassWizard 对 话 框 ， 如 图 7.14 所 示 。 

用 户 需 要 在 MFC ClassWizard 对 话 框 中 , 首先 在 ID 列表 中 选择 IDC_HELP, 在 Messages 
列表 中 选择 BN_CLICKED, 然后 单 击 Add Function 按钮 弹出 Add Member Function 对 话 框 ， 
如 图 7.15 所 示 。 


Mesaage Maps | Member variables | Automaton | Acivex Events | clace Into | 


Project: 5 中 ame: 3 Pr 
邮件 收发 器 -ICMyDIg J = 
C4 邮件 收发 器 Dig.h, -WP 件 收发 缮 Dig.cpp 
ObjectIDs; Messages: DERIERRai 


CMyD ~ 

Pm Eco 
IDC_MAILTEXT 3 

IDC_PEEZHI 

IDC_RECVER 

IDC_RECVMAIL 

IDC-SENDER ~ 


Member functione: 
V DoDamnExehange 


WwW onintDlalog ON_wM_INITONL OG 
WwW Onpaint ON_WM_PAINT Add, Bo 
W OnQueryDragteon ON_wWM_OUERYDRAGICON es 
IW OnSysCommand ON WM SYSCOMMAND [or 
Deseripton; .indieates he user elieked a bunon 

Meseage: BN_CLICKED 

衫 定 取消 Object ID: IDC_HELP 
图 7.14 MFC ClassWizard 对 话 框 图 7.15 Add Member Function 对 话 框 


用 户 在 图 7.15 所 示 对 话 框 中 可 以 看 到 IDC_HELP 按钮 的 响应 消息 是 单 击 消息 , 函数 名 
是 OnHelp0， 单 击 OK 按钮 返回 到 代码 编辑 器 中 编写 代码 。 在 该 实例 中 ， 是 将 软件 相关 的 
使 用 步骤 暂时 显示 在 邮件 内 容 编辑 框 中 的 。 代 码 如 下 : 


void CMyD1g: :OnHelp() 
{ 


Cstring str; // 构 造 字符 串 提示 用 户 
str+=" 本 程序 的 使 用 方法 : "; 
str+="\r\n"™; 
str+=" 第 一 步 : 设置 SMTP 服务 器 ， 包 括 服务 器 地 址 、 端 口号 码 "; 
str+="\r\n"; 
str+=" 第 二 步 : 设置 发 件 人 地 址 、 收 件 人 地 址 、 邮 件 主题 、 邮 件 内 容 ，"; 
str+=" 其 中 ， 发 件 人 地 址 与 邮件 内 容 可 以 为 空 ， 其 余 均 不 能 为 空 。"; 


str+="\r\n"; 


str+=" 注 意 ; 如 果 需 要 将 邮件 发 送 到 多 人 ， 请 在 收 件 人 地 址 内 使 用 逗号 将 地 址 区 分 开 


即 可 "; 
str+="\r\n"; // 添 加 回 车 换行 符号 
str+=" 作 者 :liangwei, 89:393817181";// 显 示 作 者 联系 方式 ， 便 于 学 习 交 流 
MessageBox (str); // 显 示 帮 助 信息 


本 // 省 略 部 分 代码 
} 


在 VC 编译 器 中 运行 程序 , 然后 单 击 “ 使 用 前 须知 ”按钮 , 会 弹出 帮助 信息 ,如 图 7.16 


Bs 


第 2 篇 Visual C++ 网 络 编程 典型 应 用 


所 示 。 


六 
Se 世人 nT 


， 如 果 看 要 将 邮件 发 送 到 多 人 ， 请 在 收 件 人 地 址 内 使 用 到 号 将 地 址 区 分 开 即 可 ) 
作者 : liangrei.g9-39561TI1 


图 7.16 显示 帮助 信息 
用 户 查看 完 帮 助 信息 以 后 ， 程 序 应 该 使 “SMTP 设置 ”按钮 处 于 可 用 状态 便于 用 户 设 
置 ， 而 帮助 按钮 设置 为 禁用 状态 ， 并 且 将 该 按钮 的 标题 设置 为 “功能 待 用 ”。 目 的 是 将 该 
按钮 作为 扩展 功能 之 用 。 实 现 这 些 功能 ， 需 要 在 函数 OnHelp0 中 修改 代码 如 下 : 


void CMYD1g::OnHelp() 
{ 


Cstring str; // 构 造 字符 串 提示 用 户 
a // 省 略 部 分 代码 
if (MessageBox (str)==IDOK) // 显 示 帮 助 信息 
{ 


GetDlgItem(IDC HELP) ->SetWindowText ("功能 待 用 ") ; // 更 改 按 钮 标题 
GetD1gItem(IDC HELP)->EnableWindow (false); 
// 禁 用 按钮 IDC_HELP 
GetD1gItem(IDC PEIZHI) -> EnableWindow (true) 
// 设 置 “配置 ”按钮 可 用 
} 


当 用 户 单 击 “ 确 定 ”按钮 以 后 ， 界 面 中 的 部 分 控件 状态 以 及 其 标题 都 会 发 生 改 变 ， 如 
图 7.17 所 示 。 


邮件 收发 避 v1.0 


欢迎 使 用 本 软件 8 (作者 : Liangrei) 


图 7.17 部 分 控件 发 生 改变 


7.3.3 添加 服务 器 设置 对 话 框 
为 了 方便 用 户 设置 SMTP 服务 器 相关 信息 ， 所 以 在 工程 中 需要 添加 一 个 对 话 框 完成 服 


RE 


第 7 章 ”邮件 收发 器 


务 器 设置 功能 。 在 本 节 中 ， 将 向 用 户 讲解 添加 服务 器 设置 对 话 框 以 及 在 实例 程序 中 怎样 使 


用 该 对 话 框 。 


当 SMTP 配置 按钮 可 用 时 , 用 户 可 以 进入 引导 步骤 的 第 二 步 设置 SMTP 服务 器 相关 信 
息 。 首 先 ， 在 VC 中 添加 设置 服务 器 对 话 框 ，ID 设置 为 IDD_DIALOG1。 在 VC 资源 管理 
器 中 ， 插 入 对 话 框 资源 ， 如 图 7.18 所 示 。 对 话 框 插入 以 后 ， 添 加 并 调整 控件 的 位 置 以 及 大 


小 。 界 面 效 果 如 图 7.19 所 示 。 


-lz 
书 珊 当 员 ER 


np 


[tolg1tent De WELP) SE 
tplgltent loe_PELZM 


Set REC 
lobals 

a - rt TE 
书 《区 要 1 > 更 六 寿 有 || 


nln. Col44 7 


图 7.18 插入 对 话 框 


图 7.19 界面 效果 


然后 , 使 用 MFC 向 导 为 刚 创建 的 对 话 框 添加 类 , 按 下 Ctrlt+W 组 合 键 , 弹出 New Class 
对 话 框 ， 直 接 单 击 OK 按钮 ， 弹 出 New Class 对 话 框 ， 如 图 7.20 所 示 。 


Class information 
Name: 


File name: 


Base class: 


Dialog ID: 


FT automation 


在 对 话 框 中 ， 设 置 新 类 名 为 CSet， 基 类 为 CDialog。 单 击 OK 按钮 ， 返 回 


CSet 

Setcpp 2 
Change… 

CDialog 习 

IDD_DIALOG1 到 


图 7.20 New Class 对 话 框 


Cancel 


MFC 向 导 对 


话 框 ,在 消息 映射 属性 页 中 分 别 为 确定 按钮 和 重 填 按钮 添加 消息 响应 函数 , 如 图 7.21 所 示 。 


kB 
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到 这 一 步 ， 服 务 器 设置 对 话 框 已 经 添加 完成 。 


Meooage Mapo | Member Variableo | Automation | ActiveX Evente | clecs Into | 
Prujeet: Class ame; 


乌 件 收 次 器 | 3 
CH6 件 收发 器 VSeLn CY. 好 件 收发 问 WBet.cpp 
: Mrssnges: 
BN_DOUBLECLICKED 

FNITI 
IDC-EDNz 
IDC_PORT 
IDC_SEVERanD 
Member functions: 
V DoDataExchange 


W OnButton1 ON IDC BUTTON1:BN CLICKED 


WW OnHuttonz ON IDC EUIIONZHN CLICKED 


Descriplon: Indicates me user clicked a bunon 


7.21 添加 消息 映射 


接 下 来 ， 应 在 CSet 类 的 头 文件 Seth 中 ， 定 义 两 个 变量 用 来 表示 服务 器 地 址 与 端口 号 
码 。 代 码 如 下 : 


class CSet : public CDialog 
{ 
public: 
CString m severadd; // 定 义 服务 器 地 址 变量 
int m port; // 第 一 端口 变量 
二 // 省 略 部 分 代码 


外 注意 : 定义 变量 时 ， 为 了 方便 在 该 类 外 部 访问 ， 应 将 其 访问 权限 设置 为 公共 。 


为 CSet 类 添加 初始 化 函数 CSet::OnInitDialog0, 在 该 函数 中 为 服务 器 地 址 以 及 端口 号 
设置 默认 值 ， 并 且 在 确定 按钮 和 重 填 按钮 的 消息 响应 函数 中 添加 代码 。 代 码 如 下 : 


BOOL Cset::OnInitDialog() //Cset 初始 化 函数 
{ 
CDialog: :OnInitDialog(); 
m severadd="mail.163.com"; // 初 始 化 变量 
GetD1gItem(IDC EDIT1)->SetWindowText (m severadd); 
// 设 置 服务 器 地 址 
GetDlgItem (IDC EDIT?2)->SetWindowText ("25"); // 设 置 端口 号 
return TRUE; 
} 
void Cset::OnOK() // 确 定 按钮 函数 
i 
Cstring str; // 临 时 变量 
GetD1gItem(IDC_EDIT1) ->GetWindowText (m_severadd); // 获 得 服务 器 地 址 
GetDlgItem (IDC_EDIT2) ->GetWindowText (str); // 获 取 端 口号 码 
m port=atoi (str.GetBuffer (1)); // 转 换 端口 为 数字 型 
::SendMessage (this->m hWnd,WM CLOSE, 0,0); // 关 闭 设置 窗口 
} 
void CSet::OnReset () // 重 填 按钮 函数 
{ 
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GetDlgItem(IDC EDIT1)->SetWindowText (""); // 设 置 两 个 编辑 框 为 空 
GetDlgItem(IDC EDIT2)->SetWindowText (""); 
上 
通过 上 面 的 步骤 ， 用 户 已 经 将 服务 器 设置 对 话 框 成 功 添加 到 本 实例 的 工程 中 了 。 并 且 
为 其 添加 了 相应 的 类 ， 实 现 了 按钮 的 消息 响应 等 操作 ， 在 确定 按钮 的 函数 中 必须 在 用 户 设 
置 完成 以 后 关闭 设置 对 话 框 ， 通 过 想 该 对 话 框 发送 WM_CLOSE 消息 。 


外 注意 : 在 SMTP 服务 器 时 ， 其 默认 端口 为 23。 笔 者 建议 使 用 该 默认 端口 号 ， 不 需要 进 
行 修改 。 


7.3.4 使 用 服务 器 设置 对 话 框 


用 户 在 主 对 话 框 类 中 使 用 该 对 话 框 类 ， 必 须 在 头 文件 “邮件 收发 器 Dlgh” 中 包含 新 
类 的 头 文件 。 并 且 在 CMyDlg 类 中 定义 新 类 对 象 。 代 码 如 下 : 


#include "set.h" // 在 头 文件 “邮件 收发 器 Dlg .h” 中 添加 
class CMYD1g : public CDialog // 在 cMyD1g 类 中 定义 新 类 对 象 
{ 
本 // 省 略 部 分 代码 
Protected: 
CSet set; // 定 义 Cset 对 象 


} 

在 CMyDlg 类 中 CSet 类 对 象 时 将 访问 权限 设置 为 保护 类 型 . 接 下 来 ,用 户 需 要 为 SMTP 
设置 按钮 添加 消息 响应 函数 ， 函 数 名 为 OnPeizhiO。 在 该 函数 中 ， 使 用 CSet 对 象 调用 服务 
器 设置 对 话 框 ， 代 码 如 下 : 

void CMyD1g: :OnPeizhi () 

本 

set。DoModal (); // 调 用 设置 对 话 框 


// 省 略 部 分 代码 


如 果 用 户 将 SMTP 服务 器 的 相关 信息 设置 完成 以 后 ， 实 例 界 面 中 的 所 有 按钮 以 及 编辑 
框 等 控件 应 该 全 部 可 用 。 所 以 ， 还 应 该 在 配置 函数 中 添加 代码 。 代 码 如 下 : 


void CMyD1g: :OnPeizhi () 
{ 


set. DoModal(); // 调 用 设置 对 话 框 
ifl(set.m port>0 && set.m port<100) // 判 断 端口 号 范围 
if(set.m severadd!="") // 判 断 IP 地 址 不 为 空 
{ 
GetD1gItem (IDC_SENDER) ->EnableWindow (true); // 设 置 各 个 控件 状态 


GetDlgItem(IDC RECVER)->EnableWindow (true); 

GetDlgItem(IDC SUBJECT)->EnableWindow (true); 

GetDlgItem(IDC SENDMRIIL) ->EnableWindow(true) 7 

GetDlgItem(IDC RECVMAIL)->EnableWindow (true); 

GetDlgItem(IDC MAILTEXT)->EnableWindow (true) 7 

GetDlgItem(IDC SENDER) ->SetWindowText (""); 

::SendMessage (statu, SB_SETTEXT, 0, (long) "SMTP 服务 器 信息 设置 成 功 并 已 经 连接 服务 


"I 
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器 ! "); 
} 
MessageBox ("服务 器 地 址 不 能 为 空 ") ; 


else 
{ 
MessageBox ("端口 范围 (0~100)"); 
} 
}} 


运行 代码 ， 如 果 用 户 输入 服务 器 地 址 为 空 、 端 口号 为 空 或 者 超出 规定 范围 ， 则 程序 会 


提示 用 户 出 现 错误 ， 应 该 重新 进行 设置 ， 如 图 7.22 所 示 。 和 否则， 服务 器 设置 成 功 ， 如 图 
7.23 所 示 。 
i 
发 送 邮 件 
牧 件 人 地 址 : Me 
主因: — 
邮件 收发 到 同一 邮件 内 容 : P| 
服务 器 地 址 不 能 为 空 并 且 请 口 范围 o~100) 
[| 
| 欢 了 合用 本 软件 (作者 :Liwmerti) | suT? 服 务 器 信息 设置 成 功 1 
图 7.22 提示 用 户 重新 设置 图 7.23 服务 器 信息 设置 成 功 


SMTP 服务 器 信息 配置 成 功 以 后 ， 用 户 可 以 发 送 邮 件数 据 到 指定 的 SMTP 服务 器 上 。 
关于 发 送 与 接收 邮件 的 功能 将 分 别 在 下 面 的 内 容 中 讲解 。 如 果 用 户 对 邮件 收发 器 的 基本 工 
作 原 理 和 编程 方法 还 不 熟悉 ， 请 再 复习 本 章 前 几 小 节 的 内 容 。 


7.3.5 ”记录 程序 配置 信息 


用 户 在 程序 中 ， 还 需要 实现 程序 的 相关 配置 信息 存 取 ， 以 便 用 户 知晓 软件 使 用 过 程 中 
的 一 些 信息 。 在 本 实例 中 ， 笔 者 打算 使 用 文件 存 取 来 实现 该 功能 ， 当 然 也 可 以 使 用 程序 读 
取 INI 文 件 或 者 是 注册 表 实 现 。 

由 于 在 本 程序 中 ， 只 有 当 用 户 第 一 次 使 用 软件 时 才 会 被 要 求 查看 使 用 须知 ， 而 在 后 面 
的 使 用 中 都 不 被 要 求 查看 ， 所 以 在 这 里 需要 创建 文件 保存 用 户 是 否 已 经 查看 。 如 果 用 户 已 
经 查看 ， 则 在 程序 启动 时 通过 读 取 查 看 状态 决定 界面 的 初始 化 。 首 先 ， 在 程序 主 对 话 框 类 
中 定义 CFile 对 象 。 代 码 如 下 : 

i CMyDlg : public CDialog 


a // 省 略 部 分 代码 
public: 

CFile file; // 定 义 文件 对 象 为 该 类 属性 
protected: 


HICON m hIicon; 


Be 
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Cset set; // 设 置 对 话 框 对 象 
局 本 // 省 略 部 分 代码 
} 
用 户 在 类 中 定义 的 文件 对 象 file 在 该 类 中 处 于 全 局 作用 。 然 后 ， 在 “使 用 前 须知 ” 按 
钮 的 响应 函数 CMyDlg::OnHelp0 中 添加 代码 如 下 : 


void CMYD1g: :OnHelp () 
{ 
ES // 省 略 先前 的 代码 

if (MessageBox (str)==IDOK) 
. 
GetDlgItem(IDC HELP) ->SetWindowText ("功能 待 用 "); // 将 按钮 留 为 待 用 
GetDlgItem(IDC HELP)->EnableWindow (false); // 禁 用 按钮 
GetD1gItem(IDC PEIZHI)-> EnableWindow (true); // 配 置 按钮 可 用 
CFile filel ("状态 配置 文件 .lw", CFile::modeReadWrite); 

// 创 建文 件 ， 并 将 文件 属性 指定 为 可 读 可 写 


char d=" // 定 义 查看 状态 标志 
filel.Write (gd, sizeof (d)); // 写 入 该 状态 标志 
filel.Close(); // 关 闭 文件 


} 

} 

在 代码 中 ， 如 果 用 户 查看 使 用 须知 并 且 返 回 ， 则 调用 CFile 类 创建 文件 ， 文 件 名 称 为 
“状态 配置 文件 .Jw”， 文 件 属性 为 “CFile::modeReadWrite”。 将 查看 状态 标志 YY 写 入 配置 
文件 中 待 程序 启动 时 读 取 以 便 判断 用 户 是 否 已 经 查看 使 用 须知 ， 然 后 关闭 文件 。 

接 下 来 ， 用 户 应 该 在 程序 初始 化 函数 CMyDlg::OnInitDialog0 中 ， 实 现 文 件 的 读 操作 ， 
判断 查看 状态 以 及 初始 化 界面 等 。 代 码 如 下 : 


BOOL CMyD1g::OnInitDialog() // 程 序 初始 化 函数 
{ 


CDialog: :OnInitDialog(); 
file .Open ("状态 配置 文件 .lw", CFile: :modeReadWrite); ”// 以 读 写 方式 打开 配置 文件 


char d; // 定 义 状 态 标志 字符 
file.Read (&d,1); // 读 取 状 态 标志 
file.Close(); // 关 闭 文件 
if (d=="' Y') // 判 断 状态 标志 
{ 

GetDlgItem (IDC HELP)->EnableWindow (false); /1 初始化 程序 界面 


GetDlgItem (IDC PEIZHI )->EnableWindow (true); 
} 


else 

| 

GetDlgItem(IDC PEIZHI)->EnableWindow (false); 
3 


GetDlgItem (IDC SENDER) ->EnableWindow (false); // 设 置 各 个 控件 状态 
GetDlgItem(IDC RECVER)->EnableWindow (false); 

GetD1gItem(IDC SUBJECT)->EnableWindow (false); 

GetDlgItem(IDC SENDMAIL)->EnableWindow (false); 

GetDlgItem(IDC RECVMAIL)->EnableWindow (false); 

GetDlgItem(IDC MAILTEXT) ->EnableWindow (false); 
GetDlgItem(IDC_SENDER) ->SetWindowText ("请 用 户 首先 查看 “使 用 前 须知 ”! "); 
} 


在 程序 初始 化 函数 中 添加 以 上 代码 ， 并 且 运 行 。 程 序 启动 界面 如 图 7.24 所 示 。 
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7.24 设置 查看 状态 标志 后 的 启动 界面 


通过 上 面 的 代码 已 经 实现 了 用 户 仅 在 第 一 次 使 用 软件 时 ， 需 要 查看 程序 使 用 须知 ， 在 
以 后 的 使 用 中 并 不 需要 再 进行 查看 该 须知 的 功能 。 

在 本 节 中 ， 用 户 应 该 了 解 了 怎样 设置 程序 的 引导 步骤 ， 并 且 在 该 步骤 中 如 何 引 导 使 用 
者 正确 地 使 用 软件 。 在 VC 环境 中 , 用户 应 该 知道 怎样 使 用 MFC 向 导 添 加 所 需 资源 ， 如 类 
和 对 话 框 等 。 文 件 操作 对 任何 一 个 程序 而 言 ， 都 是 非常 重要 的 ， 通 过 实例 代码 ， 用 户 了 解 
了 如 何 利用 文件 控制 程序 界面 的 初始 化 操作 等 。 


7.3.6 设置 并 连接 服务 


器 


在 7.3.5 节 中 ， 用 户 已 经 知道 了 添加 服务 器 设置 对 话 框 的 方法 。 那 么 ， 用 户 设置 服务 
器 信息 完成 后 ， 应 该 立刻 连接 到 该 服务 器 。 在 实现 该 功能 之 前 ， 需 要 在 对 话 框 类 中 定义 套 


接 字 等 变量 。 代 码 如 下 : 


class CMYD1g : public CDialog 


{ 

public: 

SOCKET 3s; 
sockaddr_ in addr; 
hostent *host; 


} 


// 定 义 套 接 字 
// 定 义 网 络 地 址 结构 对 象 
// 定 义 主机 信息 结构 变量 


用 户 在 程序 初始 化 函数 中 定义 了 3 个 变量 ， 分 别 是 套 接 字 句柄 、 网 络 地 址 结构 对 象 和 
主机 信息 结构 。 功 能 的 实现 应 该 在 函数 CMyDlg::OnPeizhi0 中 添加 代码 如 下 : 


void CMyD1g::OnPeizhi () // 配 置 按钮 响应 函数 

{ 
// TODO: Add your control notification handler code here 
set.DoModal (); // 调 用 模式 对 话 框 
if(set.m port>0 && set.m port<100) // 判 断 端口 范围 

{ 

if(set.m severadd!="") // 服 务 器 地 址 不 能 为 空 
. 

addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
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addqr.sin port=htons(set.m port) 7 


//host=: :gethostbyname (set.m severadd.GetBuffer(1)); // 获 取 主机 地 址 
addr.sin addr.s un.S addr=inet addr(set.m severadd.GetBuffer(1)); 
// 转 换 IP 地 址 
s=: :socket (AF_INET, SOCK_ STREAM, IPPROTO TCP); // 创 建 套 接 字 
if(connect(s, (sockaddr*) &addr,sizeof (addr))) 
{ 
: :SendMessage (statu, SB_SETTEXT, 0, (long) "SMTP 服务 器 信息 设置 成 功 并 已 经 连接 服务 
器 ! "); 
GetD1gItem(IDC_SENDER) ->EnableWindow (true); // 设 置 各 个 控件 状态 
GetD1gItem(IDC RECVER) ->EnableWindow (true) 7 
GetDlgItem(IDC SUBJECT)->EnableWindow (true) 
GetDlgItem(IDC SENDMAIL)—>EnableWindow (true); 
GetDlgItem(IDC RECVMAIL)—>EnableWindow (true); 
GetDlgItem(IDC MAILTEXT)—>EnableWindow (true); 
GetD1gItem(IDC_SENDER) ->SetWindowText (""); 
E23e 


{ 


MessageBox (" 请 检查 网 络 连接 或 重新 设置 服务 器 信息 ! "); 


} 
else 


} 


{ 


MessageBox ("服务 器 地 址 不 能 为 空 ") ; 
} 
} 


else 
{ 
MessageBox ("端口 范围 (0~100)"); 
} 
} 
在 程序 中 ， 函 数 inet_addr0 是 将 主机 字 节 顺序 的 人 P 地 址 转换 为 网 络 字 节 顺序 。 因 此 ， 
用 户 填写 服务 器 地 址 时 应 使 用 服务 器 的 他 地 址 而 不 能 是 服务 器 域名 地 址 , 如 mail.163.com。 
用 户 从 网 络 域名 地 址 得 到 IP 地 址 ， 可 以 使 用 ping 命令 获取 。 其 方法 是 选择 “开始 ”|“ 运 
行 ” 命 令 ， 打开“ 运行 ”对 话 框 ， 输 入 cmd 命令 调用 命令 行 窗 口 ， 如 图 7.25 所 示 。 


a 
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用 户 通过 命令 行 窗口 输入 命令 即 可 从 服务 器 域名 地 址 得 到 服务 器 的 他 地址 , 输入 命令 
为 “ping maile.163.com”， 如 图 7.26 所 示 。 


图 7.26 转换 地 址 成 功 


用 户 将 得 到 的 转换 了 P 地 址 输入 服务 器 设置 对 话 框 中 , 便 可 以 连接 相应 的 服务 器 。 当 程 
序 连接 服务 器 成 功 以 后 ， 服 务 器 会 返回 响应 码 220。 代 码 如 下 : 


村 / /省略 部 分 代码 
char buf[4]; // 定 义 缓冲 区 
FecV(s,&buf,4,0)7 // 接 收 响应 数据 
if(atoi (buf)==220) // 比 较 响 应 数据 

| 
MessageBox (" 服 务 器 准备 就 绪 ! ") ; // 提 示 用 户 
} 
else 
{ 
MessageBox ("服务 器 启动 服务 失败 ! ") ; 
} 


在 程序 中 , 首先 使 用 atoi0 函 数 将 字符 类 型 的 数字 转换 为 整 型 数据 ,然后 与 服务 器 返回 
的 响应 码 进行 比较 。 如 果 相 等 ， 则 表示 服务 器 服务 已 经 准备 就 绪 ， 否 则 表示 服务 器 服务 启 
动 失败 。 


7.3.7 ”构造 邮件 
服务 器 端 服务 成 功 启动 以 后 ， 客 户 端 可 以 将 邮件 发 送 到 SMTP 服务 器 ， 但 是 在 邮件 发 


送 之 前 必须 对 邮件 的 数据 进行 顺序 调整 ， 以 符合 SMTP 协议 的 规范 。 例 如 ， 一 封 正确 的 邮 
件数 据 格式 应 该 如 下 。 


Data:Tue,04 Feb 2009 21:18:03+0800 // 邮 件 发 送 时 间 
From:lymlrl1@163.com // 发 件 人 地 址 
To:lymlrl@126.com // 收 件 人 地 址 
Subject: This is a E-Mail // 邮 件 主题 


“I 


Hello lymlrl! 
This is a E-mail! 
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WW 罕有 和 
// 邮 件 内 容 


在 实例 程序 中 ， 将 上 述 邮 件 内 容 填 入 到 响应 项 目 中 ， 如 图 7.27 所 示 。 用 户 在 图 7.27 


中 ， 可 以 看 到 邮件 内 容 与 软件 界面 


bh 的 各 个 项 目 相 对 应 。 这 里 向 用 户 讲述 从 邮件 内 容 读 取 


数据 到 界面 各 对 应 项 目 中 进行 显示 。 下 面 ， 将 向 用 户 讲述 从 界面 中 获得 数据 构造 邮件 。 首 


先 ， 在 界面 中 填 入 相关 信息 ， 如 图 7.28 所 示 。 
邮件 收发 器 v1. 0 同 
发送 人 地 址 : mrl8165 cm smp 角 是 
人 AHE: rz em Ee 
接收 地 年 
主 题 : this is a E-mail FE- 
邮 上 余 内 容 ; 全 3 后 
Fair 一 
sl 
EE | 
图 7.27 构建 邮件 


然后 ， 根 据 内 容 开 始 构造 邮件 。 代 码 如 下 : 


Data:Tue,04 Feb 2009 13:47:03+0800 


From: lymlr1@163.com 
To:lymlr1@126.com 


subject : 请 教 一 下 ， 关 于 c++ 的 问题 ? 


ce 
邮件 内 究 


澳 关 人 垃 址 : Fovilrlel26 com 


收 件 人 地 址 : 


2 


Faiaes con 


一下， 关于 Cr 区 问题 9 


者 


加 时 在 C++ 中 出 现 了 对 指针 ,我们 该 竺 么 去 析 相 它 了 


图 7.28 填 入 信息 后 的 界面 


// 邮 件 发 送 时 间 
// 发 件 人 地 址 
// 收 件 人 地 址 
// 邮 件 主题 

// 空 白 行 
// 邮 件 内 容 


请 教 一 下 ， 如 果 在 c++ 中 出 现 了 野 指针 ， 我 们 该 怎么 去 析 构 它 ? 
如 果 在 邮件 中 ， 有 多 个 收 件 人 ， 则 在 邮件 内 容 中 的 收 件 人 处 使 用 逗号 将 其 分 开 即 可 。 


例如 ， 收 件 人 地 址 为 “lymlrl@126.com，lymlrlQ@sina.com.cn，lymlrlQ@yahoo.com.cn”， 


邮件 中 收 件 人 字段 应 该 进行 修改 。 代 码 如 下 : 


To:1ymlrlel26.com，1yYmlrlesina.com.cn,1ymlrleyahoo.com.cn // 收 件 人 地 址 


则 


全 注意 : 用 户 在 构造 邮件 完成 之 后 ， 发 送 到 服务 器 之 前 ， 一 定 记得 在 邮件 内 容 最 后 处 加 上 
结尾 符 “\0” 或 者 是 NULL。 


7.3.8 发送 邮件 


首先 ， 在 VC 中 为 发 送 邮件 按钮 添加 消息 响应 函数 。 添 加 方法 是 在 双击 该 按钮 ， 弹 出 
Add Member Function 〈 添 加 函数 ) 对 话 框 ， 并 显示 其 函数 名 ， 如 图 7.29 所 示 。 


"lls 
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Add Wenber Function 


Member function name: 
OnSendmail 
Cancel 


Message: BN_CLICKED 
Object ID: IDOK 


图 7.29 添加 函数 对 话 框 


然后 ， 单 击 OK 按钮 ，VC 视图 将 跳 转 到 该 函数 定义 处 。 代 码 如 下 : 


void CMYD1g::OnSendmail() 
{ 
Cstring data="Data: Tue,04 Feb 2009 21:18:03+0800\r\n";// 构 造 发 送 字 符 串 
Cstring sender=" MAIL FROM:" 
CString recver=" RCPT TO:"7 
CString subject=" Subject:"; 
Cstring s,r,sl; 
GetDlgItem(IDC SENDER) ->GetWindowText (s); // 获 取 控 件 的 内 容 
GetDlgItem(IDC RECVER)-> GetWindowText (r); 
GetDlgItem(IDC SUBJECT)-> GetWindowText (s1); 
GetD1gItem(IDC MAILTEXT)-> GetWindowText (mailtext); 
sender+=s; // 添 加 获取 内 容 
recvert=r; 
subject+=s1; 
char sengmail[]={"HELO", // 构 造 发 送 数组 
sender.GetBuffer (1), 
recver.GetBuffer (1), 


"DATA\r\n", // 发 送 DATA 命令 
subject .GetBuffer (1), 
mailtext.GetBuffer (1), 
PTNE Na // 退 出 会 话 
NO // 结 束 符 
} 
send(s, sendmail, sizeof (sendmail) ,0); // 向 服务 器 发 送 邮 件 
); 


上 面 的 代码 中 ， 用户 在 构造 邮件 时 必须 在 最 后 添加 上 结束 符 “\0” 或 者 NULL。DATA 
命令 是 告知 服务 器 准备 接收 客户 端 将 要 发 送 的 邮件 内 容 。 如 果 邮 件 发 送 成 功 ， 服 务 器 会 返 
回响 应 码 250， 所 以 在 客户 端 没 有 接收 到 该 响应 码 ， 则 表示 邮件 发 送 未 完成 ， 继 续 执行 发 
送 。 否 则 ， 表 示 发 送 完 成 。 为 了 让 用 户 知道 当前 发 送 的 状态 ， 在 状态 栏 中 显示 该 状态 信息 
即 可 。 代 码 如 下 : 

{ 


// 省 略 部 分 代码 
char buf[4]; // 定 义 缓冲 区 
recv(s,buf, 4,0); // 接 收 响应 数据 
if (buf !=NULL) // 是 否 接收 到 数据 
{ 


if((atoi)buf==250) 
| 
::SendMessage (statu, SB_SETTEXT, 0, (long) "邮件 发 送 成 功 ! ") 7 


else 


{ 
::SendMessage (statu, SB_SETTEXT, 0, (long) "邮件 发 送 失败 ! ") ; 
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::SendMessage (statu, SB SETTEXT,0, (long) "邮件 正在 发 送 ! "); 
} 
} 


以 上 代码 是 发 送 邮件 时 ， 用 户 使 用 相关 的 界面 显示 邮件 当前 的 发 送 状态 。 例 如 ， 状 态 


7.3.9 发 送 邮件 实例 


用 户 将 前 面 的 程序 代码 完善 以 后 ， 便 可 以 实现 邮件 的 发 送 功能 ， 该 功能 的 实现 是 在 程 
序 界面 中 发 送 邮件 按钮 的 消息 响应 函数 。 代 码 如 下 : 


void CMYD1g::OnSendmail () 

{ 

char buf[4]; // 定 义 缓冲 区 
Cstring data="Data: Tue,04 Feb 2009 21:18:03+0800\r\n";// 构 造 发 送 字 符 串 
CString sender=" MAIL FROM:"; 

CString recver=" RCPT TO:"; 

Cstring subject=" Subject:"; 

CString s,r,sl; 

GetDlgItem(IDC SENDER) ->GetWindowText (s); // 获 取 控 件 的 内 容 


GetD1gItem(IDC RECVER) -> GetWindowText (r); 
GetD1gItem(IDC SUBJECT) -> GetWindowText (s1) 7 
GetDlgItem(IDC MAILTEXT)-> GetWindowText (mailtext); 
sender+=s; // 添 加 获取 内 容 
recvert=r; 
subject+=s1; 
char sengmail[]={"HELO", / /构造 发 送 数组 
sender.GetBuffer (1), 
recver.GetBuffer (1), 
"DATA\r\n", // 发 送 DATA 命令 
subject .GetBuffer (1), 
mailtext.GetBuffer (1), 


nOUTTNENan // 退 出 会 话 
ND // 结 束 符 
} 
send(s, sendmail, sizeof (sendmail),0); // 向 服务 器 发 送 邮 件 
recv (s,buf, 4,0); // 接 收 响应 数据 
if (buf !=NULL) // 是 否 接收 到 数据 
{ 


if((atoi)buf==250) 
{ 
::SendMessage (statu, SB_SETTEXT, 0, (long) "邮件 发 送 成 功 ! ") 7 
} 
else 
{ 
: :SendMessage (statu, SB SETTEXT,0, (long) "邮件 发 送 失败 ! "); 
} 


else 
L! 
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: :SendMessage (statu, SB_SETTEXT, 0, (long) "邮件 正在 发 送 ! ") ; 
} 
} 


运行 上 面 的 代码 ， 如 果 邮 件 发 送 成 功 ， 则 在 状态 栏 上 显示 “邮件 发 送 成 功 ” 字 样 ， 如 
图 7.30 所 示 。 


邮件 收发 器 v1-0 


发 送 人 地址: Pomlrlal26 eon 


收 孟 人 地 址 : es com 
主题: 下 和 er 和 是 7 


邮件 内 容 ; 
情 要 一 下 ， 如 果 在 CH+ 中 出 现 了 时 指针 ， 我 们 赤 瑟 双 去 析 和 村 忆 ? 


图 7.30 邮件 发 送 成 功 
在 本 节 中 ， 向 用 户 再 次 讲述 了 邮件 的 构造 方法 以 及 如 何 将 界面 控件 中 的 内 容 组 合成 一 
封 规范 的 邮件 。 根 据 SMTP 服务 器 返回 的 响应 码 ， 判 断 邮件 的 发 送 状态 和 更 新 界面 显示 。 
通过 本 节 的 学 习 ， 用 户 能 够 掌握 邮件 发 送 的 原理 以 及 方法 。 在 该 实例 中 ， 其 具体 代码 请 用 
户 参考 随 书 光盘 。 
外 注意 : 读者 在 学 习 本 节 实 例 程 序 时 ， 应 该 结合 光盘 中 的 程序 代码 和 书 中 的 相关 说 明 。 否 
则 ， 读 者 学 习 起 来 将 非常 费力 。 同 时 ， 读 者 也 可 以 将 实例 程序 进行 修改 ， 满 足 自 
己 的 要 求 ， 使 学 习 效果 达到 最 佳 。 


7.4 接收 邮件 


用 户 接收 邮件 是 通过 POP3〈 接 收 邮件 服务 器 ) 协议 完成 的 。 一 般 情 况 下 ， 客 户 端 通 
过 向 服务 器 发 送 相应 的 POP3 命令 获取 邮件 .服务 器 接收 到 命令 以 后 , 会 将 数据 按照 E-Mail 
的 数据 格式 整理 邮件 ， 然 后 将 邮件 发 送 到 客户 端 进行 解析 、 显 示 。 在 本 节 中 ， 将 向 用 户 讲 
解 POP3 命令 等 相关 知识 。 


7.4.1 POP3 简介 


一 般 ， 用 户 接收 邮件 是 通过 向 POP3 (接收 邮件 ) 服务 器 发 送 命令 获取 的 。 具 体 发 送 
命令 的 步骤 与 SMTP 协议 一 样 ， 所 以 在 这 里 不 再 袭 述 ， 如 有 不 清楚 的 地 方 请 用 户 复习 服务 
器 前 面 的 知识 。 在 本 节 中 ， 将 向 用 户 介 绍 部 分 POP3 命令 以 及 编程 实现 接收 邮件 功能 。 
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1. POP3 命 令 


POP3 通信 方式 与 SMTP 一 样 ,使 用 标准 命令 与 服务 器 进行 数据 交换 。POP3 协议 中 还 
规定 了 标准 端口 为 110 号 端口 。POP3 标准 命令 如 表 7.7 所 示 。 


表 7.7 部 分 POP3 标准 命令 


命令 意 义 

QUIT 终止 与 服务 器 会 话 

STAT 提供 信箱 大 小 

LIST 获取 邮件 大 小 

USER 客户 端 发 送 账 号 信息 到 服务 器 验证 

PASS 客户 端 发 送 密码 信息 到 服务 器 验证 

TOP 取出 第 M 封 邮 件 信 头 和 邮件 内 容 的 前 NN 行 
DELE 删除 第 N 封 邮件 

RSET 复位 POP3 会 话 

RETR 取出 第 N 封 邮件 


在 上 表 中 列 出 了 POP3 的 相关 命令 ， 下 面 将 对 其 中 的 命令 进行 详解 。 
口 命令 QUIT 的 作用 是 终止 与 服务 器 的 会 话 连接 。 格 式 如 下 : 
QUIT 


该 命令 如 果 发 送 到 服务 器 执行 成 功 ， 服 务 器 则 会 返回 OK， 表 示 服 务 器 同意 客户 端 退 
出 对 话 。 
口 命令 STAT 的 作用 是 请 求 服务 器 信箱 的 大 小 信息 。 
口 命令 LIST 可 以 获取 指定 邮件 的 大 小 信息 。 如 果 不 带 任何 命令 参数 ， 则 服务 器 会 返 
回 所 有 邮件 的 大 小 。 格 式 如 下 : 


请 区 大 // 客 户 端 发 送 命令 LIST 
1 1024 // 表 示 第 一 封 邮件 的 大 小 


2 2048 // 表 示 第 二 封 邮件 的 大 小 


名 注意 : 格式 中 的 序号 表示 邮件 的 序列 号 ， 紧 跟 后 面 的 数字 表示 该 邮件 的 大 小 信息 。 使 用 

该 命令 获得 的 邮件 列表 序号 是 从 1 开始 的 。 

口 命令 USER 将 标识 客户 端 发 送 的 账号 信息 。 格 式 如 下 : 

USER lymlrl 

口 命令 PASS 将 标识 客户 端 发 送 的 密码 信息 。 格 式 如 下 : 

PASS lwlwlw 

口 命令 TOP 表示 将 取出 指定 邮件 的 信 头 和 其 邮件 内 容 的 前 N 行 。 例如， 用 户 需要 取 
出 第 一 封 邮件 的 前 两 行内 容 ， 则 发 送 TOP 命令 到 服务 器 即 可 。 代 码 如 下 : 


CString str("TOP 1 2\r\n"); // 构 造 命令 字符 串 
send(s, str.GetBuffer (1), sizeof (str) ,0); // 发 送 命 令 到 服务 器 


口 命令 DELE 表示 对 邮件 进行 删除 操作 。 如 果 该 命令 配合 其 命令 参数 可 以 删除 第 N 
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封 邮件 。 例 如 ， 用 户 将 删除 第 N 封 邮 件 ， 格 式 如 下 : 
DELE N 
口 命令 RSET 的 作用 是 对 POP3 会 话 过 程 进行 复位 。 
口 命令 RETR 的 作用 是 取出 第 N 封 邮 件 。 例 如 ， 用 户 需要 取出 第 N 封 邮件 。 格 式 
如 下 : 
RETR N 
当 客 户 端 发 送 该 命令 以 后 ， 服 务 器 会 返回 被 请 求 邮件 的 全 部 内 容 〈 包 括 邮 件 头 和 邮件 
内 容 ) 。 
如 果 服 务 器 成 功 接收 到 POP3 命令 之 后 ， 都 会 返回 相应 的 请 求 数据 到 客户 端 。 返 回 的 
数据 格式 如 下 : 


OK 
服务 器 将 返回 相应 的 数据 


2. POP3 会 话 


POP3 会 话 过 程 与 SMTP 一 样 ， 必 须 首先 连接 服务 器 成 功 以 后 才能 进行 相关 操作 。 下 
面 简单 介绍 一 下 POP3 会 话 的 过 程 ， 代 码 如 下 : 


连接 服务 器 

OK 

USER lymlrl // 验 证 用 户 名 

OK 

PASS lwlwlw // 验 证 密码 

OK 

retr 1 // 请 求 第 一 封 邮件 内 容 
OK 服务 器 将 第 一 封 邮 件 内 容 发 送 到 客户 端 

Quit // 结 束 会 话 

OK 


上 面 代码 中 ， 单 行为 客户 端 操 作 行为 ， 双 行为 服务 器 操作 行为 。 该 会 话 过 程 是 一 个 交 
互 式 的 问答 过 程 。 用 户 将 上 述 会 话 过 程 使 用 编程 方法 来 实现 ， 代 码 如 下 : 
S25 // 省 略 部 分 代码 
CString user="user lymlrl\r\n"; // 构 造 命令 信息 
CString pass="pass lwlwlw\r\n"; 
CString retr="retr 1\r\n"; 
CString quit="quit\r\n"; 
char sendmsg[]={user.GetBuffer(1), 
pass.GetBuffer (1), 
retr.GetBuffer (1), 
quit.GetBuffer(1) 


} 
send(s, sendmsg, sizeof (sendmsg),0); // 发 送 命 令 数 组 
在 代码 中 ， 首 先 定义 命令 字符 串 ， 然 后 再 将 这 些 命令 字符 串 组 合 到 一 个 字符 数组 中 ， 
并 发 送 到 服务 器 执行 。 


外 注意 : 因为 POP3 的 工作 方式 与 SMTP 相似 ， 所 以 在 本 章 中 不 再 向 读者 继续 讲解 关于 
POP3 的 其 他 知识 。 如 果 用 户 需要 具体 了 解 ， 请 参考 其 他 书籍 。 
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7.4.2 ”接收 邮件 实例 界面 


在 本 章 实例 程序 中 ， 需 要 为 工程 添加 接收 邮件 所 使 用 的 对 话 框 ， 并 且 在 VC 编译 环境 
中 对 该 对 话 框 界面 进行 设置 。 本 节 主 要 讲述 界面 的 设计 以 及 代码 实现 方法 。 

1. 添加 接收 邮件 界面 

接收 邮件 与 发 送 邮件 一 样 ， 通 过 向 服务 器 发 送 相关 POP3 命令 以 获取 相应 的 邮件 。 本 
章 中 ， 用 户 需 要 为 工程 “邮件 收发 器 ”添加 相应 的 界面 以 便 实现 接收 邮件 功能 。 添 加 邮件 


接收 界面 的 步骤 如 下 : 
(1) 打开 VC 资源 管理 器 ， 右 击 Dialog， 弹 出 快捷 菜单 ， 如 图 7.31 所 示 。 


师 件 收发 展 -上 crozoft Visual CH - [ 妆 御 科 友 血 - ID DIALOG! (Dialor)]} [ale 
| 国文 半 可 机 查看 WD 插入 D 工程 下 里 昌 工具 和 DD 和 且 0D =lslx| 
甜 生 | 号 -二 - 了 加山 要 多 了 


ET 
本 


| 


ET 


习 六 -| 罗湖 于 1 区 人 


村 
| 


图 7.31 添加 对 话 框 资源 
当然 , 用 户 除了 使 用 上 述 添加 对 话 框 的 方法 之 外 ， 还 可 以 使 用 窗口 中 的 “插入 ”菜单 。 
(2) 选择 “插入 Dialog” 命 令 ， 在 VC 工程 中 添加 一 个 新 建 对 话 框 。 界 面 如 图 7.32 
所 示 。 


图 7.32 ”新建 对 话 框 界面 


“Ts 
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(3) 用 户 可 以 向 新 建 对话 框 界面 中 添加 控件 ， 以 满足 接收 邮件 功能 的 需要 。 本 实例 中 ， 
接收 邮件 的 界面 效果 如 图 7.33 所 示 。 


加 POP3 医 收 虎 件 


上 - 寺 下 - 圭 


图 7.33 ”接收 邮件 界面 


在 图 7.33 所 示 界 面 中 ， 所 添加 的 控件 列表 如 表 7.8 所 示 。 
表 7.8 添加 控件 列表 


控 件 四 控件 作用 
IDC_sTATIC 标识 “发 送 者 ” 

IDC NAEM 显示 发 送 者 邮件 地 址 
IDC EDIT1 显示 获取 到 的 邮件 内 容 
IDC SHANG 显示 上 一 封 邮件 
IDC NEXT 显示 下 一 封 邮件 
IDC RECV 接收 邮件 操作 

IDC ZHANGHU 输入 用 户 名 


IDC PASS 编辑 框 控 件 输入 密码 


通过 以 上 3 个 步 又， 在 工程 项 目 中 已 经 成 功 添加 了 接收 邮件 的 对 话 框 。 现 在 ， 用 户 可 
以 为 刚 添加 的 对 话 框 指定 一 个 新 类 ， 按 下 键盘 上 的 CtrlHW 组 合 键 ， 弹 出 New Class〔 添 加 
新 类 ) 对 话 框 ， 如 图 7.34 所 示 。 

用 户 在 该 对 话 框 中 , 为 添加 的 接收 邮件 对 话 框 指定 类 名 为 CRecv, 其 他 选项 设 为 默认 。 
单 击 OK 按钮 返回 主 界面 ， 用 户 可 以 在 VC 资源 管理 器 的 类 视图 列表 中 看 到 该 类 的 相关 文 
件 。 打 开 该 类 头 文件 定义 变量 。 代 码 如 下 : 


class CRecv : public CDialog 
{ 


public: 

CString mailadd; // 定 义 发 送 者 邮件 地 址 
Cstring mailtext; // 定 义 邮件 内 容 
Cstring name; // 定 义 用 户 名 


Cstring pass; // 定 义 密码 


sls 
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cDialog 


IDD DaLoGz 


mt | | ce Cieateable by ype10: | 节 件 要 发 可 .Recv 


图 7.34 ”添加 新 类 对 话 框 


Cstring netadd; // 定 义 服务 器 地 址 
Cstring port; // 定 义 服务 器 端口 
// 省 略 部 分 代码 


在 CRecv 类 中 ， 定 义 用 户 名 、 密 码 、 邮 件 内 容 等 字符 串 变量 ， 并 且 将 保护 属性 设置 为 
公有 属性 。 


7.4.3 ”使 用 接收 邮件 对 话 杠 


如 果 用 户 需 要 在 工程 主 对 话 框 类 CMyDlg 中 使 用 CRecv 类 ,还 必须 在 头 文件 “邮件 收 
发 器 Dlg.h” 中 包含 该 类 头 文件 Recv1.h。 代 码 如 下 : 


en // 省 略 部 分 代码 
#include "set.h" // 包 含 cset 类 头 文件 
#include "Recvl.h" // 包 含 cRecv 类 头 文件 
2 / /省略 部 分 代码 


然后 ， 在 CMyDlg 类 中 定义 CRecv 类 对 象 。 代 码 如 下 : 
class CMVYD1g : public CDialog 
{ 


ee // 省 略 部 分 代码 
Protected: 
CSet set; //SMTP 设置 对 话 框 类 
CRecv recvdlg; /接收 邮件 对 话 框 类 


} 
在 接收 邮件 按钮 的 响应 函数 OnRecvmai0 中 , 使 用 CRecv 类 对 象 调用 接收 邮件 对 话 框 。 
代码 如 下 : 
void CMyD1g: :OnRecvmail () 


/ /省略 部 分 代码 


"a 
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recvdlg.DoModal () 7 // 使 用 接收 邮件 对 话 框 
} 


用 户 在 编译 器 中 ， 编 译 运行 以 上 代码 ， 然 后 单 击 “接收 邮件 ”按钮 ， 将 弹出 接收 邮件 
模式 对 话 框 ， 如 图 7.35 所 示 。 

在 程序 中 为 了 防止 用 户 使 用 不 当 ， 使 其 发 生 错 误 ， 所 以 显示 该 对 话 框 时 ， 应 该 使 “ 接 
收 邮 件 ” 按 钮 、 显 示 邮 件 内 容 的 编辑 框 等 主要 控件 被 禁用 。 例 如 ， 当 用 户 输入 用 户 名 及 密 
码 以 后 ， 使 “接收 邮件 ”按钮 可 用 。 当 用 户 浏览 第 二 封 邮件 之 后 ， 使 “上 一 封 ” 按 钮 处 于 
可 用 状态 。 初 始 化 界面 代码 如 下 : 


BOOL CRecv: :OnInitDialog() 
CDialog::OnInitDialog (); 
GetDlgItem (IDC RECV)->EnableWindow (false); // 禁 用 各 个 按钮 
GetD1gItem(IDC_EDIT1)->EnableWindow (false); 
GetD1gItem(IDC SHANG)->EnableWindow (false); 
GetDlgItem(IDC NEXT)->EnableWindow (false); 
return TRUE; 
} 


运行 以 上 代码 ， 对 话 框 初始 化 界面 如 图 7.36 所 示 。 


POP3 接 收 邮件 凤 
用 户 名 ， 
窗 码 ， 
发 送 者 ， 
= 圭 
图 7.35 ”模式 对 话 框 图 7.36 界面 初始 化 


全 注意 : 在 工程 中 实现 邮件 接收 功能 均 在 “POP3 接收 邮件 ”对 话 框 中 进行 实现 。 


7.4.4 接收 邮件 


在 实例 程序 中 ， 用 户 使 用 接收 邮件 对 话 框 类 CRecv 对 邮件 进行 接收 。 但是， 在 该 对 话 
框 中 还 需要 进行 一 些 功能 上 的 实现 。 例 如 ， 为 界面 中 的 按钮 添加 消息 响应 函数 等 操作 。 

1. 添加 消息 响应 函数 

首先 ， 为 接收 邮件 按钮 添加 消息 响应 函数 ， 添 加 方法 如 图 7.37 所 示 。 该 函数 的 作用 是 
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根据 用 户 输入 的 用 户 名 以 及 密码 获取 POP3 服务 器 中 对 应 的 邮件 。 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 


Project: Class name: Add Class... ~ 
邮件 收发 器 -| 


[cnecv ~ 

是 
C4 邮件 收发 器 WRecv1.h, C4 邮件 收发 器 WRecv1.cpp Lesa Fonction.. | 
Object IDs: Messages: Delete Function 
Ghee Rs 5 和 
ee Member function name: 
IDC PASS [Tec 
IDC RECY 一 : 
nn Message: BN_CLICKED 
Member functions: Object ID: IDC_RECY, 
¥ DoDataExchange 
W oninitDialog CON_WM_INITDIALOG 


Description: Indicates the user clicked a button 


确定 取消 
图 7.37 添加 “接收 邮件 ”按钮 消息 响应 函数 
名 注意 : 用 户 可 以 在 Member function name 编辑 框 中 修改 响应 函数 名 ， 在 本 实例 中 ， 将 该 
函数 名 设置 为 OnRecv。 然 后 单 击 OK 按钮 ， 返 回 VC 主 界面 。 


然后 ， 分 别 为 “上 一 封 ”按钮 和 “下 一 封 ”按钮 添加 消息 响应 函数 ， 如 图 7.38 和 图 
7.39 所 示 。 这 两 个 函数 的 作用 分 别 是 方便 用 户 阅 读 上 一 封 邮件 和 阅读 下 一 封 邮 件 。 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 
Broject: Class name: a 
a a . 
unction... 
C4..4 邮 件 收发 器 \Recv1.h, C4 邮件 收 发 器 \Recv1.cpp 
Object IDs: Messages: Delete Function 
CRecv 
IDC_EDITI Edit Code 
IDC_NAME 
IDC_NEXT 
IDC_PASS 
IDC_RECY_ 
Te Message: BN_CLICKED 
Member functions: ‘Object ID: IDC_SHANG 
¥ DoDataExchange 
W OninitDialog ON_WM_INITDIALOG 
W onRecv ON_IDC_RECY:BN_CLICKED 
Description: 。 Indicates the user clicked a button 
We | Mm | 


图 7.38 添加 “上 一 封 ”按钮 消息 响应 函数 
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Message Maps | Member Variables | Automation | Activex Events | Class Info | 


Project Class name: Add Class... ~ 
邮件 收发 器 习 和 


|cnecv 了 


C4. 邮件 收发 器 IRecv1.h, Cd 邮件 收发 器 WRecvl.cpp 
Object IDs: Messages: Delete Function 


CRecv 


IDC EDIT1 Add Neaber Function Edit Code 


IDC NAME 
IDC NE 条 Memberfunction name: 


IDC_PASS x 
IDC_RECYV om 
IDC_SHANG 
Member functions: 

¥ DoDataExchange 
W oninitDialog ON_WM_INITDIALOG 

W onRecv ON_IDC_RECVY:BN_CLICKED 
W OnShang ON_IDC_SHANG:BN_CLICKED 


Message: BN_CLICKED 
Object ID: IDC_NEXT 


Description: Indicates the user clicked a button 


| 融 | 


图 7.39 添加 “下 一 封 ”按钮 消息 响应 函数 


在 本 实例 中 ， 将 “上 一 封 ” 按 钮 和 “下 一 封 ”按钮 的 消息 响应 函数 分 别 命名 为 
OnShang0 和 OnNext()。 


最 后 ， 程 序 等 待 用 户 输入 用 户 名 以 及 密码 结束 后 ， 应 该 使 按钮 “接收 邮件 ”处 于 可 用 
状态 。 所 以 ， 用 户 应 该 为 密码 编辑 框 IDC_PASS 响应 消息 EN_CHANGE， 函 数 名 为 
OnChangePass0， 如 图 7.40 所 示 。 


Message Maps | Member Variables | Automation | Activex Events | Class Info | 


Project: Class name: FS 
邮件 收发 可 习 [cnewv ET 
ct- 邮件 收发 器 ev ct. 邮件 疏 发 器 ecvl_epp 
Object IDs: Messages: Delete Fonction 


CRecy 


IDCeom Add Neaber Function Edit Code 


>_RECY 
IDC_SHANG 


Message: EN_CHANGE 
Member functions: Object ID: IDC_PASS 

¥ DoDataExchange 

W oninitDialog ON_WM_INITDIALOG 

W OnNext ON_IDC_NEXT:BN_CLICKED 
W OnRecv ON_IDC_RECY:BN_CLICKED 
W OnShang ON_IDC_SHANG:BN_CLICKED 


Description: Indicates the display is updated after text changes 


图 7.40 为 IDC_PASS 添加 消息 响应 函数 


用 户 在 工程 中 添加 响应 函数 成 功 以 后 ， 各 个 按钮 的 响应 函数 分 别 是 OnRecv0、 


ds 
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OnShang0、OnNext0 和 OnChangePass()。 
2. 更 新 界面 状态 


当 用 户 在 密码 编辑 框 中 输入 用 户 密码 以 后 ，“ 接 收 邮件 ”和 “下 一 步 ”按钮 应 该 处 于 
可 用 状态 。 代 码 如 下 : 


void CRecv: :OnChangePass () 


if (i>3) // 表 示 用 户 至 少 输入 3 个 字符 

Cstring str; // 定 义 字符 串 
this->GetWindowText (str); // 获 取 编 辑 框 中 的 内 容 
if(str.Find("\n")) // 以 回 车 键 结束 输入 


GetDlgItem(IDC RECV) ->EnableWindow (true); // 设 置 按钮 可 用 
GetD1gItem(IDC NEXT) ->EnableWindow (true); 


在 代码 中 ， 变 量 i 的 作用 是 记录 用 户 输入 字符 的 个 数 ， 该 变量 是 在 CRecv 类 中 定义 并 
在 初始 化 函数 OnInitDialog0 初 始 化 。 代 码 如 下 : 


class CRecv : public CDialog 
{ 


public: 

CRecv (CWnd* pParent = NULL); 
EoE // 定 义 变量 
int n; // 表 示 邮 件 序列 号 
HWND stat; // 定 义 状态 栏 句柄 
SOCKET s; // 定 义 套 接 字 句柄 
六 // 省 略 部 分 代码 
} 
BOOL CRecv: :OnInitDialog () // 初 始 化 函数 
证 

CDialog::OnInitDialog (); 

二 // 省 略 部 分 代码 
i=0; // 初 始 化 变量 i 
n=0; // 初 始 化 邮件 序列 号 为 0 
statu=: :CreatestatusWindow (WS_CHILDIWS_VISIBLE, "接收 邮件 ) ", this->m_hwnd, 
LDC 123) // 创 建 状态 栏 


return TRUE; 
} 


运行 以 上 代码 ， 用 户 在 密码 编辑 框 中 输入 密码 以 后 ， 程 序 开始 更 新 界面 ， 如 图 7.41 
所 示 。 


和 3“ 
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lymirl@163.com 


图 7.41 更 新 后 的 界面 


7.4.5 “实现 接收 邮件 功能 


在 程序 中 ， 接 收 邮件 功能 是 在 接收 邮件 按钮 的 消息 响应 函数 中 实现 的 。 该 函数 名 为 
OnRecv0， 代 码 如 下 : 


void CRecv: :OnRecvV () 
{ 

addr.sin family=AF INET7 // 为 地 址 结构 中 的 成 员 赋值 
addqr .sin port=htons (Set.m port); 
//host=: :gethostbyname (set.m_severadd.GetBuffer(1));  // 获 取 主 机 地 址 
addr.sin addr.s un.s addr=inet addr(set.m severadd.GetBuffer(1)); 


// 转 换 IP 地 址 
s=::socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); // 创 建 套 接 字 
if(connect(s, (sockaddr*) g&addr, sizeof (addr))) // 连 接 服务 器 
{ 
: :SendMessage (statu, SB_SETTEXT, 0, (long) "正在 构造 请 求 命令 ! ") 
Cstring str,strl; // 定 义 字符 串 
GetD1gItem (IDC_ZHANGHU) ->GetWindowText (name); // 获 取 用 户 名 
GetD1gItem (IDC_PRSS) ->GetWindowText (pass); // 获 取 用 户 密码 
str.Format ("USER %s",name); // 格 式 化 用 户 名 命令 字符 串 
stri="\r\n"; // 添 加 回 车 换行 符 
strl.Format ("PASS %s",pass); // 格 式 化 密码 命令 字符 串 
Strl+="\r\n"; // 添 加 回 车 换行 符 
str+=strl; // 连 接 两 个 字符 串 
: :SendMessage (statu, SB_SETTEXT, 0, (long) "正在 发 送 请 求 命令 ! ") ; 
// 提 示 用 户 正在 发 送 命令 
send(s,str.GetBuffer(1),sizeof (str),0); // 发 送 命 令 字符 串 
char recv[100]={0}; // 定 义 字符 数组 用 于 接收 数据 
if(recv(s,recv,100,0)) // 接 收 数据 
{ 
if(recv[]==’O’ &&recv[1]=='K') // 服 务 器 应 答 成 功 


1 
::SendMessage (statu, SB_SETTEXT, 0, (long) "服务 器 应 答 成 功 ! ") ; 


.194 。 
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SendcmdAndRecv (0) // 调 用 自 定义 函数 进行 命令 发 送 
人 // 接 收 失败 
: ::SendMessage (statu, SB_SETTEXT, 0, (long) "接收 失败 ! "); 
Ts // 连 接 失 败 
Sn (statu, SB SETTEXT,0, (long) "连接 失败 ! ") 7 


} 


在 上 面 的 代码 中 ， 用 户 首先 填充 网 络 地 址 结构 对 象 atdr， 然 后 创建 套 接 字 对 象 s， 并 
且 使 用 该 套 接 字 句柄 进行 连接 服务 器 。 如 果 服 务 器 连接 成 功 ， 则 将 构造 成 功 的 命令 字符 串 
发 送 到 服务 器 执行 。 服 务 器 执行 成 功 则 会 返回 字符 串 OK， 接 下 来 程序 调用 自 定义 函数 
SendCmdAndRecv0 进 行 其 他 命令 的 发 送 。 


7.4.6 封装 客户 端 发 送 与 接收 功能 


在 本 实例 中 ， 由 于 客户 端 需要 发 送 SMTP 命令 以 及 接收 服务 器 响应 码 和 邮件 数据 。 所 
以 ， 为 了 方便 用 户 在 客户 端 编程 时 调用 这 些 功 能 ， 需 要 自 定 义 一 个 函数 实现 客户 端 发 送 命 
令 与 接收 服务 器 返回 的 数据 。 本 节 中 ， 将 该 自 定义 函数 命名 为 SendCmdAndRecvO， 下 面 
将 具体 介绍 在 实例 中 如 何 声明 和 实现 该 函数 。 

首先 ， 在 CRecv 类 中 对 自 定义 函数 SendCmdAndRecv0 进 行 声 明 。 该 函数 声明 如 下 : 


class CRecv : public Cdialog //CRecyv 类 声明 
{ 
public: 
55 // 省 略 部 分 代码 
void SendcmdAndRecv (int x); // 自 定义 函数 
本 // 省 略 部 分 代码 


上 面 代码 的 作用 是 在 CRecv 类 中 ， 手 动 添加 自 定义 函数 SendCmdAndRecvO 的 方法 。 
由 于 该 函数 方法 在 前 面 的 知识 中 以 及 进行 了 详细 的 讲解 ， 所 以 ， 在 这 里 不 再 对 此 知识 点 进 
行 讲述 。 自 定义 函数 SendCmdAndRecv0 的 作用 是 在 客户 端 发 送 用 户 信息 到 服务 器 ， 并 且 
待 服务 器 验证 成 功 后 ， 客 户 端 用 于 发 送 获 取 邮 件 的 具体 命令 ， 参 数 x 表示 获取 邮件 的 序列 
号 码 。 

然后 ， 在 CRecv 类 中 编写 代码 实现 自 定义 函数 的 功能 。 代 码 如 下 : 


void CRecv: :SendCcmdAndRecv (int x) 
下 


Ds // 将 参数 值 赋予 该 类 中 变量 n 
CString str; // 定 义 字符 串 用 于 构造 命令 
char recvdata[1024]={0}, ch[1024], ch2[1024]; // 接 收 数据 数组 
str.Format ("retr d%",n); // 格 式 化 字符 串 
stri="\r\n"; // 添 加 回 车 换行 符 
send(s, str.GetBuffer (1), sizeof (str) ,0); // 发 送 获 取 邮 件 命令 
if(recv(s,recvdata,1024,0)) // 接 收 数据 
则 
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if(recvdata[]=="'O0" && recvdata[1]=="K’) // 接 收成 功 
EF 
recvdata[lsizeof (recvdata)+1]="\0"; // 将 字符 数组 转换 为 字符 串 
maliadd=recvdata[]7 
while(i=mailadd.Find("from:")!=-1 11 i< mailadd.Find("\r\n") 
// 循 环 查 找 
中 
ch[i++]=recvdata[i++]; // 拷 贝 字符 
} 
GetWindowText (IDC_ NAME) ->SetWindowText (&ch); // 设 置 发 送 者 邮件 地 址 
if(i=mailadd.Find("\n") !=-1) // 查 找 空 行 
| 
ch2 [i++]=recvdata[i++]7 // 拷 贝 字符 
GetWindowText (IDC_EDIT1)->SetWindowText (&ch); // 显 示 邮 件 内 容 
} 
else 
{ 


MessageBox ("接收 失败 ! "); 
} 


J 
k 


该 自 定义 函数 实现 了 发 送 RETR 命令 ,同时 接收 服务 器 返回 的 请 求 邮件 并 且 将 邮件 内 
容 显示 在 界面 中 。 在 程序 中 ， 发 送 相关 命令 到 服务 器 ， 如 果 服 务 器 执行 命令 成 功 ， 则 返回 


相应 的 邮件 ， 客 户 端 接收 到 该 邮件 数据 后 ， 在 数据 中 查找 发 件 人 的 邮件 地 址 以 及 邮件 内 容 
等 进行 显示 。 该 函数 对 于 本 章 实例 中 接收 邮件 功能 的 实现 非常 重要 ， 请 用 户 仔细 查看 代码 
并 学 习 。 运 行 以 上 程序 后 ， 用 户 接收 邮件 ， 如 图 7.42 所 示 。 
用 记名， [wmGibeam 
接收 邮件 
密码 
发 送 者 
未 的 本 
上 - 寺 下 - 封 
| 接收 邮件 
图 7.42 接收 邮件 


用 户 通过 代码 运行 后 的 效果 ， 可 以 知道 自 定义 函数 SendCmdAndRecvO 不 但 可 以 发 送 
命令 ， 还 可 以 接收 邮件 内 容 并 显示 。 当 用 户 查看 当前 邮件 以 前 或 以 后 的 邮件 时 ， 同 样 需 要 
使 用 到 该 函数 。 
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7.4.7 显示 邮件 数据 


当 用 户 浏览 完 当 前 邮件 以 后 ,如果 想 继续 浏览 下 一 封 邮件 则 单 击 “下 一 封 ”按钮 即 可 。 
et te et 封 邮件 时 ， 程 序 将 返回 一 个 错误 信息 给 用 
。 例 如 ， 显 示 “ 指 定 邮 箱 中 已 经 没有 可 供 显 示 的 邮件 了 ”等 信息 。“ 下 一 封 ” 按 钮 的 消 
0 CRecv::OnNext0, 在 该 函数 编写 程序 实现 用 户 查看 下 一 封 邮件 功能 。 代 
码 如 下 : 
void CRecv: :OnNext () 
| n+=1; // 使 当前 邮件 序列 号 自动 加 1， 指 向 下 一 封 
this->SendcmdAndRecv (n) // 调 用 自 定义 函数 发 送 相关 命令 并 且 显示 邮件 
if(!GetDlgItem(IDC SHANG)->IsVisible())  ”// 获 得 上 一 封 按 钮 的 当前 状态 


L 
GetDlgItem (IDC SHANG) ->EnableWindow (true); // 显 示 该 按钮 
1 


} 


该 按钮 的 响应 函数 主要 是 实现 用 户 从 POP3 服务 器 上 获取 当前 邮件 的 下 一 封 邮 件 内 
容 ， 并 将 其 显示 到 程序 界面 上 。 函 数 IsVisible0 的 作用 是 查看 对 象 当前 状态 是 否 可 用 ， 在 
本 程序 中 使 用 该 函数 是 为 了 获得 “上 一 封 ” 按 钮 的 显示 状态 以 便 确定 按钮 可 用 或 禁用 。 

在 VC 主 界面 中 ， 保 存 该 响应 函数 代码 并 且 运 行 ， 用户 单 击 “ 下 一 封 ”按钮 以 后 ， 程 
序 调用 自 定义 函数 SendCmdAndRecv(0) 发 送 客户 端 请 求 并 且 接收 显示 相应 邮件 内 容 。 和 否则 ， 
提示 用 户 发 生 错误 ， 如 图 7.43 所 示 。 


用 户 名 ， [|ymm@163.com 
接收 邮件 
密 码 ， 


上 - 寺 


7.43 “下 一 封 ”按钮 响应 


如 果 用 户 需 要 浏览 上 一 封 邮 件 ， 则 单 击 “ 上 一 封 ”按钮 进行 浏览 即 可 。 该 按钮 的 实现 
原理 与 前 面 所 讲 的 下 一 封 按钮 一 样 。 上 一 封 按 钮 的 消息 响应 函数 名 称 为 CRecv::OnShang0， 
作用 是 显示 当前 邮件 的 前 面 一 封 邮 件 内 容 。 代 码 如 下 


void CRecv: :OnShang () 
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n=n-1; // 当 前 邮件 序列 号 减 1 
if (n==0) // 如 果 当 前 邮件 已 经 是 第 一 封 邮 件 
{ 
MessageBox ("当前 邮件 已 经 是 第 一 封 邮件 ") ; 
} 


e135e 
{ 
this->SsendcmdAndRecv (n); // 调 用 自 定义 函数 发 送 相关 命令 并 且 显 示 该 邮件 

} 

} 

在 代码 中 ， 使 用 当前 邮件 的 序列 号 减 去 1 获得 前 一 封 邮件 的 序列 号 。 如 果 该 序列 号 为 
0， 则 提示 用 户 当前 邮件 是 第 一 封 邮件 ， 否 则 调用 自 定义 函数 SendCmdAndRecv0 执 行 按钮 
功能 。 如 果 当 前 邮件 之 前 已 经 没有 任何 邮件 , 那么 程序 将 会 弹出 消息 框 提示 用 户 发 生 错误 ， 
如 图 7.44 所 示 。 


7.44 浏览 上 一 封 邮 件 发 生 错误 


如 果 用 户 浏览 的 当前 邮件 之 前 还 有 其 他 邮件 ， 则 程序 将 会 显示 邮件 的 内 容 以 及 邮件 发 
送 者 的 邮件 地 址 。 

到 这 里 ， 用 户 已 经 编写 完 本 实例 中 重要 代码 ， 实 现 了 程序 的 基本 功能 。 如 果 用 户 需 要 
进一步 学 习 邮 件 收 发 的 相关 知识 或 者 实现 更 为 接近 实用 的 邮件 收发 程序 ， 则 可 以 对 本 实例 
中 的 界面 或 者 代码 进行 修改 完善 ， 例 如 ， 添 加 发 送 或 者 接收 带 附件 功能 的 程序 代码 。 这 样 
对 用 户 学 习 邮 件 收 发 原理 会 起 到 推波助澜 的 作用 。 


7.4.8 代码 分 析 


在 这 里 ， 本 节 将 对 自 定义 函数 SendCmdAndRecv0 的 功能 代码 进行 分 析 。 该 自 定义 函 
数 的 原型 如 下 : 


void SendCcmdAndRecv (int x) 


该 函数 的 作用 在 7.4.2 节 中 已 经 向 用 户 讲解 。 如 果 函 数 调用 成 功 ， 则 将 在 程序 窗口 相 
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应 的 控件 中 进行 显示 。 该 函数 含有 一 个 参数 x， 表 示 要 获取 的 邮件 序列 号 。 用 户 调用 函数 
时 需要 指定 该 参数 , 一 般 情况 下 ， 当 程序 启动 时 , 参数 x 均 从 1 开始 计数 。 函数 将 “RETR” 
命令 与 参数 x 格式 化 后 再 发 送 到 服务 器 。 代 码 如 下 : 


写本 // 省 略 部 分 代码 
n=x; // 将 参数 值 赋予 该 类 中 变量 n 
CString str; // 定 义 字符 串 用 于 构造 命令 
char recvdata[1024]={0}, ch[1024],ch2[1024]; // 接 收 数据 数组 
str.Format ("retr d%",n); // 格 式 化 字符 串 
str+="\r\n"; // 添 加 回 车 换行 符 
send(s, str.GetBuffer (1), sizeof (str),0); // 发 送 获 取 邮 件 命 令 
: // 省 略 部 分 代码 


在 代码 中 , 首先 定义 字符 串 对 象 , 然后 根据 参数 将 字符 串 格式 化 以 后 , 通过 函数 send0 
发 送 到 服务 器 。 在 格式 化 命令 字符 串 时 ， 一 定 需 要 记 住 在 命令 最 后 必须 加 上 符号 “\n”， 
因为 这 样 才能 使 服务 器 知道 客户 端 发 送 的 命令 结束 。 

如 果 服 务 器 接收 并 执行 命令 以 后 ， 将 返回 客户 端 所 请 求 的 相应 邮件 内 容 。 这 时 ， 客 户 
端 程序 调用 函数 recvO 进 行 接收 并 且 在 代码 中 实现 数据 分 析 。 代 码 如 下 : 

RE // 省 略 部 分 代码 

if(recv(s,recvdata,1024,0)) 7/ 接收 数据 


4 
if(recvdata[]=='0' && recvdata[1]=='K') // 执 行 成 功 


recvdata[sizeof (recvdata)+1]="\0”; // 将 字符 数组 转换 为 字符 串 
maliadd=recvdata[]; 
while (i=mailadd.Find("from:") !=-1] || i< mailadd.Find("\r\n")) // 循 环 查找 
上 


ch [i++]=recvdata[i++]7 // 乒 贝 字符 
GetWindowText (IDC_NAME) ->SetWindowText (&ch) ; ”// 设 置 发 送 者 邮件 地 址 
if (i=mailadd.Find("\n") !=-1) // 查 找 空 行 
{ 
ch2[i++]=recvdata[i++]; // 拷 贝 字符 


GetWindowText (IDC_EDIT1)->SetWindowText (&ch); // 显 示 邮 件 内 容 


} 


else 
{ 
MessageBox ("接收 失败 ! ") ; 
} 


了 

当 客户 端 成 功 接收 到 邮件 数据 后 ， 由 于 服务 器 成 功 执行 命令 以 后 会 返回 OK， 所 以 客 
户 端 需要 判断 数据 中 前 两 个 字符 是 否 是 OK， 然 后 在 接收 的 数据 最 后 添加 字符 “\0”， 表 示 
将 接收 到 的 字符 数据 转换 为 字符 串 。 

字符 串 转换 成 功 以 后 , 程序 调用 CString 类 的 函数 Find0 查 找 相应 的 标题 字 头 获取 邮件 
信息 。 通 过 在 字符 串 中 查找 回 车 符号 “mn”， 将 字符 串 指针 定位 到 邮件 内 容 处 ， 最 后 通过 
循环 将 邮件 内 容 显 示 到 程序 窗口 中 。 

通过 自 定义 函数 的 分 析 ， 用 户 可 以 自行 在 VC 中 进行 封装 自 定义 函数 ， 实 现 自 定义 功 
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能 。 这 样 对 用 户 学 习 C++ 将 会 是 很 好 的 一 次 实践 机 会。 


3， 奈 结 


通过 本 章 , 用 户 学 习 了 SMTP、POP3 命令 、 一 般 邮 件 的 数据 格式 以 及 服务 器 响应 客户 
端 请 求 以 后 返回 到 客户 端的 应 答 内 容 。 本 章 还 讲解 了 在 VC 中 使 用 资源 管理 器 实现 程序 界 
面 的 美化 和 编程 实现 构造 命令 、 发 送 命令 、 接 收 响应 数据 、 分 析 数 据 以 及 显示 数据 等 操作 。 
用 户 在 学 习 本 章 的 实例 程序 时 ， 不 但 可 以 学 习 在 VC 中 怎样 实现 程序 界面 的 消息 响应 ， 还 
可 以 学 习 邮 件 客 户 端 与 服务 器 之 间 的 工作 原理 。 
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网 络 文件 传输 是 一 种 基于 网 络 平台 的 文件 操作 。 通 过 网 络 文件 传输 器 可 以 将 需要 操作 
的 文件 通过 网 络 在 两 台 计算 机 上 实现 数据 异地 传输 功能 。 例 如 ， 现 在 非常 流行 的 P2P 点 
对 点 ) 传输 功能 就 是 通过 网 络 实现 用 户 异地 下 载 或 上 传 文件 。 在 网 络 中 ， 任 何 数据 都 可 以 
进行 传输 ， 与 网 络 通信 一 样 ， 大 部 分 文件 传输 同样 是 依靠 套 接 字 完 成 ， 也 可 以 通过 匿名 管 
道 等 进行 传输 。 


8.1 CFile 类 


在 Windows 操作 系统 下 编程 操作 文件 时 ， 可 以 使 用 MFC 类 库 中 的 CFile 类 ， 也 可 以 
使 用 Win32 API 函数 进行 编程 。 对 于 用 户 而 言 ，CFile 类 比较 简单 容易 使 用 ， 所 以 大 部 分 
用 户 在 文件 操作 编程 方面 比较 偏向 于 该 类 。 但 是 使 用 API 函数 编程 可 以 使 用 户 更 加 了 解 程 
序 底层 的 一 些 原理 。 


8.1.1 构造 函数 


在 MFC 中， 关于 文件 操作 的 类 有 很 多 。 其 中 ， 最 为 常用 的 一 个 是 CFile 类 ， 这 个 函数 
几乎 涵盖 了 所 有 的 文件 操作 功能 。 首 先 ，CFile 类 的 构造 函数 原型 如 下 : 

CEile::CFile(); // 无 参数 的 构造 函数 

CFile::CFile( LPCTSTR lpszFileName，UINT nOpenFlags );// 有 参数 的 构造 函数 

其 中 ， 第 一 个 构造 函数 没有 参数 ， 表 示 在 生成 文件 对 象 时 才 调用 ， 此 时 该 对 象 并 未 绑 
定 任何 文件 。 如 果 用 户 希 望 构造 文件 的 同时 绑 定 指定 文件 ， 那 么 生成 该 文件 对 象 以 后 ， 需 
要 调用 函数 CFile::Open0 打 开 指定 文件 即 可 。 在 MFC 中 ， 函 数 Open0 的 原型 如 下 : 

Virtual BOOL Open( LPCTSTR lpszFileName, UINT nOpenFlags, CFileException* 

pError = NULL ); 

该 函数 的 作用 是 打开 指定 文件 ， 并 且 将 该 文件 与 一 个 文件 对 象 相关 联 。 参 数 如 下 : 

口 参数 lpszFileName 表示 打开 的 文件 名 称 ， 该 名 称 可 以 是 一 个 文件 的 相对 路 径 或 者 

是 绝对 路 径 〈 表 示 完 整 路 径 ) 。 

口 参数 nOpenFlags 表示 将 以 何 种 方式 打开 文件 。 文 件 打开 方式 如 表 8.1 所 示 。 

口 参数 pError 表示 打开 文件 时 ， 所 发 生 的 异常 情况 。 默 认 值 为 NULL。 

例如 ， 用 户 调用 没有 参数 的 构造 函数 创建 文件 对 象 ， 并 且 需 要 将 该 对 象 与 指定 文件 绑 
定 在 一 起 再 打开 文件 。 代 码 如 下 : 
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CEile file; 


file.Open(”C: \ 例 子 .txt",CFile:modeReadWrite); 


如 果 用 户 使 用 带 有 参数 的 构造 函数 创建 文件 对 象 ， 表 示 在 对 象 创建 的 同时 ， 已 经 与 指 


定 文件 相关 联 了 。 函 数 中 参数 意义 如 下 : 


口 参数 lpszFileName 表示 需要 操作 的 文件 路 径 ， 该 路 径 可 以 是 绝对 路 径 ， 也 可 以 是 
相对 路 径 。 例 如 ， 打 开路 径 为 “C:\ 例 子 .txt” 的 文件 ， 可 以 将 路 径直 接 指 定 为 绝对 
路 径 C:\ 例 子 .txt。 如 果 路 径 指定 为 例子 .txt， 那 么 程序 将 会 在 其 所 在 目录 下 查找 


该 文件 。 若 文件 不 存在 ， 则 会 报错 。 


口 参数 nOpenFlagss 指定 文件 的 打开 方式 ， 如 表 8.1 所 示 。 


表 8.1 文件 打开 方式 


打开 方式 意 义 
CFile::modeCreate 创建 新 文件 并 覆盖 原 有 文件 
CFile:: modeCreate|CEFile::modeNoTruncate 创建 文件 但 不 覆盖 原 有 文件 
CFile::modeRead 以 只 读 方式 打开 文件 
CFile::modeWrite 以 只 写 方式 打开 文件 
CFile::modeReadWrite 以 可 读 写 方式 打开 文件 
CFile::ShareDenyNone 允许 其 他 进程 读 写 文件 
CFile::ShareDenyRead 不 允许 其 他 进程 读 文 件 
CFile::ShareDenyWrite 不 允许 其 他 进程 写 文件 
CFile::ShareExclusive 不 允许 其 他 进程 读 写 文件 


用 户 在 代码 中 可 以 调用 带 有 参数 的 构造 函数 创建 文件 对 象 ， 并 且 将 文件 的 打开 方式 指 


定 为 可 读 可 写 。 代 码 如 下 : 


CFile file('C:\ 例 子 .txt',CFile:modeReadWrite); 


// 省 略 部 分 代码 
// 创 建文 件 对 象 


用 户 通过 上 面 的 代码 ， 可 以 创建 一 个 文件 对 象 ， 并 与 指定 文件 相关 联 ， 为 其 设置 了 打 


开 方 式 为 读 写 “CFile::modeReadWrite”。 


对 于 用 户 而 言 ， 以 上 两 种 构造 函数 在 使 用 上 均 可 以 达到 目的 。 只 是 在 打开 文件 时 ， 前 
者 需要 显 式 地 调用 函数 Open0 打 开 文件 ， 而 后 者 则 在 文件 对 象 创建 的 同时 打开 文件 ， 属 于 


隐 式 。 


8.1.2 ” 读 写 文件 


当 用 户 创建 文件 对 象 成 功 以 后 , 可 以 调用 相关 的 操作 函数 对 其 进行 读 写 操作 。 在 MFC 
中 ， 进 行文 件 读 写 操作 的 函数 分 别 是 CFile 类 的 函数 Read0 和 Write0。 原 型 分 别 如 下 : 


Virtual UINT Read(void* lpBuf, UINT nCount); 


// 读 文件 


Virtual void Write(const void* lpBuf, UINT nCount); // 写 文件 


两 个 函数 的 参数 及 其 意义 均 相 同 ， 如 下 所 示 : 
口 参数 lpBuf 表示 指向 缓冲 区 的 指针 。 
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口 参数 nCount 表示 需要 操作 的 字 节 数 。 
其 中 ， 读 文件 的 函数 Read0 如 果 调 用 成 功 ， 则 会 返回 实际 读 取 到 的 字 节 数目 。 用 户 在 
程序 中 使 用 这 两 个 函数 对 文件 进行 操作 ， 代 码 如 下 : 


本 // 省 略 部 分 代码 

char *text[100]7 // 定 义 字 符 数组 

CFile file('C:\ 例 子 .txt',CFile:modeReadWrite); // 创 建文 件 对 象 

file.Read (text,100); // 将 文件 数据 读 取 到 指定 缓冲 区 中 
file.Write (text,100); // 将 缓冲 区 中 的 数据 写 到 文件 中 
2 7/ 省略 部 分 代码 


上 述 代码 中 ， 创 建文 件 对 象 以 后 ， 分 别 调用 函数 Read0 和 Write0 对 该 文件 进行 读 写 操 
作 。 如 果 文件 中 原 有 数据 为 空 或 者 不 足 用 户 指定 的 数目 时 ， 函 数 Read0 将 返回 实际 读 取 到 
的 字 节 数 。 代 码 如 下 : 


3 // 省 略 部 分 代码 

int n=0; // 定 义 并 初始 化 变量 

CString St // 定 义 字符 串 

n=file.Read (text,100); // 将 文件 数据 读 取 到 指定 缓冲 区 中 
证 全 0) 多 全 作为 空 

{ 


MessageBox (" 文 件 为 空 ! ") ; 
} 


elise 
{ 
str.Format ("实际 读 取 到 的 文件 字 节 数 为 ds\n",n); // 格 式 化 字符 串 


MessageBox (str); 


} 


上 述 的 代码 实现 了 读 取 文件 ， 并 且 根 据 读 取 到 的 文件 数据 数目 判断 文件 是 否 为 空 。 若 
为 空 则 提示 用 户 原 有 文件 数据 为 空 ， 否 则 显示 实际 读 取 到 的 文件 数据 数目 。 


8.1.3 文件 关闭 


用 户 操作 完 文件 后 ， 需 要 将 文件 关闭 ， 和 否则 将 发 生 错误 或 者 前 面 的 操作 失败 。 实 现 文 
件 关闭 操作 的 函数 分 别 是 函数 Abort0 和 Close0， 原 型 分 别 如 下 : 

virtual void Rbort () 7 // 强 制 关闭 文件 并 销毁 文件 对 象 

Virtual void Close(); // 正 常 关闭 文件 

以 上 两 个 函数 的 作用 都 是 关闭 文件 。 但 是 ， 使 用 前 者 关闭 文件 是 在 操作 文件 发 生 异常 
时 才 使 用 该 函数 对 文件 实行 强制 关闭 ， 如 果 文 件 属于 正常 关闭 时 使 用 后 者 即 可 。 
全 注意 : 一 般 情况 下 ， 在 Windows 操作 系统 中 操作 文件 ， 例 如 写 入 文件 ， 系 统 均 提供 组 

冲 机 制 ， 即 在 文件 正常 关闭 才 将 数据 写 入 文件 所 在 的 物理 盘 符 中 。 

当 用 户 希 望 操作 文件 时 ， 为 了 避免 数据 丢失 ， 需 要 将 数据 立刻 写 入 文件 中 ， 则 可 以 使 

用 函数 CFile::FlushO。 该 函数 原型 如 下 : 


Virtual void Flush(); 
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该 函数 将 数据 强制 写 入 文件 中 ， 避 免 数据 丢失 。 用 户 使 用 该 函数 强制 写 入 数据 后 ， 关 
闭 文件 ， 代 码 如 下 : 


7/ 省略 部 分 代码 

char *text[3]={a,b,c}; // 定 义 并 初始 化 字符 数组 
CFile file("C:\ 例 子 .txt",CFile:modeReadWrite) ; // 创 建文 件 对 象 

file.Write (text, 3); // 将 缓冲 区 中 的 数据 写 到 文件 中 
file.Flush(); // 强 制 写 入 数据 
file.Close(); // 正 常 关闭 文件 
//file.Abort (); // 强 制 关闭 文件 

Se // 省 略 部 分 代码 


在 代码 中 ， 用 户 首先 定义 并 初始 化 了 一 个 字符 数组 指针 变量 ， 然 后 创建 文件 对 象 file， 
再 强制 将 字符 数组 中 的 数据 写 入 与 该 文件 对 象 相关 联 的 文件 中 。 


8.1.4 文件 定位 


通常 情况 下 , 用 户 在 操作 某 一 文件 时 , 希望 从 文件 的 某 一 特定 处 开始 读 取 或 写 入 文件 。 
这 时 ， 用 户 将 使 用 定位 文件 的 函数 ， 如 CFile 类 的 函数 Seek0。 函 数 原型 如 下 : 

Virtual LONG Seek(LONG loff, UINT nFrom) 

Virtual DWORD GetPosition()const; 

函数 Seek 用 于 随机 访问 文件 中 的 数据 ， 参 数 意义 如 下 : 

口 参数 loff 表示 确定 指针 移动 的 字 节 数 ， 正 值 表示 指针 向 后 移动 ， 负 值 表示 指针 向 

前 移动 。 
口 参数 nFrom 表示 指针 移动 的 模式 ， 其 取 值 如 表 8.2 所 示 。 


表 8.2 文件 指针 移动 模式 取 值 


CFile::begin 从 文件 开头 向 后 移动 loff 个 字 节 


CFile::Current 从 文件 当前 位 置 向 后 移动 
CFile::end 从 文件 结尾 向 前 移动 ， 此 时 loff 必须 为 负 值 ， 表 示 向 前 移动 


该 函数 如 果 调 用 成 功 ， 返 回 值 为 新 的 相对 于 文件 开头 的 字 节 偏 移 量 。 当 文件 第 一 次 打 
开 时 ， 文 件 指 针 均 在 文件 开始 处 。 例 如 ， 用 户 打开 文件 ， 并 在 文件 结尾 处 添加 几 个 字符 。 
代码 如 下 : 


i // 省 略 部 分 代码 

char *text[3]={a,b,c}; // 定 义 并 初始 化 字符 数组 
CFile file("C:\ 例 子 .txt",CFile:modeReadWrite); // 创 建文 件 对 象 
file.Sseek(-1,CFile::end); // 将 文件 指针 定位 到 文件 结尾 
file.Write (text, 3); // 将 缓冲 区 中 的 数据 写 到 文件 中 
file.Flush(); // 强 制 写 入 数据 
file.Close() 7 // 正 常 关闭 文件 

区 // 省 略 部 分 代码 


在 代码 中 ， 用 户 使 用 函数 SeekO 将 文件 指针 定位 到 文件 结尾 处 ， 然 后 使 用 WriteO 函 数 
将 字符 写 入 文件 。 
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外 注意 : 用 户 将 文件 指针 定位 到 文件 结尾 处 时 ， 一 定 要 将 参数 loff 指定 为 负数 ， 表 示 文件 
指针 向 前 移动 。 否则 ， 程 序 将 报错 。 
在 MFC 中 , 还 有 一 个 函数 GetPosition0 用 于 获取 当前 文件 的 文件 指针 位 置 。 该 函数 原 
型 如 下 : 
Virtual DWORD GetPosition( )const; 


该 函数 如 果 调 用 成 功 ， 将 返回 相对 于 文件 开头 位 置 的 文件 指针 字 节 偏 移 量 。 用 户 可 以 
使 用 该 函数 获取 当前 文件 指针 的 位 置 ， 再 在 该 文件 指针 处 写 入 或 者 读 取 数 据 。 代 码 如 下 : 


es // 省 略 部 分 代码 

char *text[3]={a,b,c}; // 定 义 并 初始 化 字符 数组 

CFile file("C:\ 例 子 .txt",CFile:modeReadWrite); // 创 建文 件 对 象 

file. GetPosition(); // 将 文件 指针 定位 到 文件 结尾 
file.Write (text, 3); // 将 缓冲 区 中 的 数据 写 到 文件 中 
//file.Read (text, 3); // 读 取 当 前 文件 指针 后 的 3 个 数据 
file.Flush() // 强 制 写 入 数据 

file.Close(); // 正 常 关闭 文件 

2 // 省 略 部 分 代码 


在 本 节 中 , 主要 向 用 户 介 绍 了 在 MFC 中 CFile 类 的 主要 函数 的 原型 以 及 用 法 。 关 于 该 
类 的 其 他 函数 方法 将 在 后 面 的 实例 中 讲述 。 


8.2 使 用 API 函数 操作 文件 


当 用 户 使 用 MFC 编程 时 ， 除 了 使 用 CFile 类 操作 文件 以 外 ,还 可 以 使 用 API 函数 (应 
用 程序 接口 函数 ) 中 有 关 文 件 操作 的 函数 进行 编程 。 使 用 API 函数 编程 可 以 让 用 户 更 加 了 
解 文件 操作 编程 的 原理 以 及 方法 。 


8.2.1 创建 文件 


在 API 函数 中 ， 用 户 可 以 使 用 函数 Create0 进 行 创建 文件 对 象 。 该 函数 原型 如 下 : 


HANDLE CreateFilel( 
LPCTSTR lpFileName, 
DWORD dwDesiredAccess, 
DWORD dwShareMode, 
LPSECURITY ATTRIBUTES lpSecurityAttributes, 
DWORD dwCreationDisposition, 
DWORD dwFlagsAndAttributes, 
HANDLE hTemplateFile 
); 


如 果 该 函数 调用 成 功 ， 则 返回 所 创建 的 文件 对 象 句柄 。 用 户 可 以 使 用 该 对 象 句柄 对 文 
件 进 行 操作 。 其 参数 意义 如 下 : 
口 参数 jpFileName 表示 文件 名 。 该 文件 名 可 以 包含 指定 路 径 ， 表 示 将 在 指定 路 径 上 
创建 该 文件 ， 和 否则 ， 函 数 将 在 工程 目录 下 创建 该 文件 。 
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口 参数 dwDesiredAccess 表示 文件 的 存 取 方 式 。 存 取 方 式 如 表 8.3 所 示 。 
表 8.3 文件 存 取 方 式 


取 值 意 义 
0 表示 以 默认 方式 对 文件 进行 操作 
GENERIC READ 表示 以 只 读 方 式 操作 文件 
GENERIC WRITE 表示 以 只 写 方 式 操作 文件 


口 参数 dwShareMode 用 于 指定 文件 的 共享 模式 。 即 当 程序 打开 该 文件 后 是 否 允许 划 
他 进程 或 程序 以 同 种 方式 再 次 打开 该 文件 。 其 取 值 如 表 8.4 所 示 。 


表 8.4 文件 共享 模式 取 值 


取 值 意 义 
0 不 再 允许 其 他 程序 再 次 打开 该 文件 
FILE SHARE DELETE 允许 其 他 程序 对 该 文件 进行 删除 操作 
FILE SHARE READ 允许 其 他 代码 以 只 读 方式 打开 该 文件 
FILE SHARE WRITE 允许 其 他 代码 以 只 写 方式 打开 该 文件 


口 参数 lpSecurityAttributes 是 指向 结构 体 SECURITY_ATTRIBUTES 的 指针 。 用 来 为 
创建 的 文件 指定 安全 属性 。 一 般 情况 下 ， 均 将 该 参数 指定 为 NULL， 表 示 默 认 的 


安全 属性 。 
口 参数 dwCreationDisposition 表示 函数 是 打开 文件 还 是 创建 文件 。 其 取 值 如 表 8.5 
所 示 。 
表 8.5 文件 创建 方式 
取 值 意 义 
CREATE NEW 创建 新 文件 ， 如 果 文 件 已 经 存在 ， 则 函数 执行 失败 


创建 新 文件 ， 如 果 文 件 已 经 存在 ， 则 函数 会 覆盖 原文 件 并 清除 其 所 存在 的 
所 有 文件 属性 

OPEN EXISTING 打开 已 存在 的 文件 ， 如 文件 不 存在 ， 则 函数 执行 失败 

OPEN _ ALWAYS 如 果 文 件 不 存在 ， 则 创建 新 文件 ， 否 则 打开 该 文件 
TRUNCATE_EXISTING | 打开 已 经 存在 的 文件 并 将 其 内 容 清空 ， 如 果 不 存 在 ， 则 函数 执行 失败 


CREATE ALWAYS 


口 参数 dwFlagsAndAttributes 指定 文件 的 新 属性 。 其 取 值 如 表 8.6 所 示 。 


表 8.6 文件 属性 值 
取 值 意 义 
FILE ATTRIBUTE ARCHIVE 标记 存档 属性 
FILE ATTRIBUTE HIDDEN 标记 隐藏 属性 
FILE ATTRIBUTE READONLY 标记 只 读 属 性 
FILE ATTRIBUTE _ SYSTEM 标记 为 系统 文件 属性 
FILE _ ATTRIBUTE TEMPORARY 指定 临时 文件 属性 
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全 注意 : 如 果 将 文件 的 属性 指定 为 FILE_ATTRIBUTE TEMPORARY， 则 函数 会 将 文件 的 
属性 指定 为 临时 文件 。 操作 系统 会 将 临时 文件 的 内 容 保存 在 内 存 中 以 便 程序 加 快 
文件 的 存 取 速度 ， 但 当 程序 使 用 完成 后 ， 系 统 会 将 其 删除 ， 同 时 还 可 以 为 临时 文 
件 指定 操作 方式 。 临时 文件 的 部 分 操作 方式 如 表 8.7 所 示 。 


表 8.7 ”临时 文件 的 操作 方式 


操作 方式 意义 
FILE FLAG DELETE ON CLOSE 当 程序 关闭 后 ， 系 统 会 立即 删除 该 临时 文件 
FILE FLAG OVERLAPPED 设置 异步 读 写 该 临时 文件 


系统 将 不 会 对 该 临时 文件 使 用 缓存 ， 不 论文 件 有 任何 修改 都 


FILE FLAG WRITE THROUGH 将 被 立刻 写 入 硬盘 中 


口 参数 hTemplateFile 指定 文件 模板 的 句柄 ， 设 置 该 参数 后 ， 系 统 会 复制 该 文件 模板 
的 所 有 属性 到 当前 所 创建 的 文件 中 ， 用 户 可 以 将 该 参数 设置 为 NULL。 
例如 ， 用 户 使 用 函数 CreateFile0 创 建 一 个 新 文件 。 代 码 如 下 : 


es // 省 略 部 分 代码 
HANDLE handle; // 定 义 文件 句柄 
handle=: :CreateFile("C:\ 例 子 .txt", 0, FILE SHARE DELETE| FILE SHARE READ| 
FILE SHARE WRITE, NULL, CREATE ALWAYS, FILE ATTRIBUTE ARCHIVE| 

FILE ATTRIBUTE SYSTEM,NULL); // 创 建文 件 
if(handle!=-1) 
| 

MessageBox ("文件 创建 成 功 ! "); 

} 


else 
MessageBox (" 文 件 创建 失败 ! ") ; 
} 


上 述 代 码 将 在 C 盘 下 创建 一 个 名 称 为 “例子 ”的 文本 文件 。 如 果 创建 成 功 ， 则 函数 返 
回 新 创建 文件 对 象 的 句柄 ， 否 则 ， 函 数 将 返回 -1。 


外 注意 : 用 户 在 调用 API 函数 时 。 需 要 在 该 函数 前 使 用 符号 “::” 进 行 调用 ， 表 示 调 用 的 
函数 为 Win32 API 函数 。 否 则 ， 程 序 将 调用 MFC 中 相应 函数 。 


8.2.2 操作 文件 


用 户 使 用 API 函数 进行 文件 编程 时 ， 读 取 文 件 的 操作 函数 是 ReadFile0， 该 函数 原型 
如 下 : 


BOOL ReadFile( 
HANDLE hFile, 
LPVOID lpBuffer, 
DWORD nNumberOfBytesToRead, 
LPDWORD lpNumberOfBytesRead, 
LPOVERLAPPED 1pOverlapped 

); 
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该 函数 的 作用 是 从 指定 文件 中 读 取 相应 大 小 的 数据 到 指定 的 缓冲 区 中 。 如 果 函 数 调用 


失败 ， 则 返回 0。 否则 返回 非 0 值 。 其 参数 含义 如 下 : 


口 参数 hFile 表示 将 要 操作 的 文件 对 象 句柄 , 即使 用 函数 CreateFile0 成 功 创建 文件 后 


返回 的 文件 句柄 。 


口 参数 lpBuffer 是 一 个 指向 缓冲 区 的 指针 ， 函 数 读 取 到 的 数据 将 被 存放 到 该 缓冲 


区 中 。 
口 参数 nNumberOfBytesToRead 表示 用 户 将 要 读 取 的 字 节 数目 。 


口 参数 lpNumberOfBytesRead 是 一 个 指向 DWORD 类 型 的 指针 变量 ， 用 于 返回 实际 


读 取 的 字 节 数目 。 


口 参数 jpOverlapped 是 指向 结构 体 overlapped 的 指针 。 一 般 情 况 下 ， 用 户 将 该 参数 


设置 为 NULL 即 可 。 


编程 时 ， 与 读 取 文 件 的 函数 ReadFile0 相 对 应 的 函数 是 WriteFile0， 该 函数 的 作用 是 写 


入 数据 到 指定 文件 中 。 该 函数 原型 如 下 : 


BOOL WriteFilel( 
HANDLE hFile, 
LPCVOID lpBuffer, 
DWORD nNumberOfBytesToWrite, 
LPDWORD lpNumberOfBytesWritten, 
LPOVERLAPPED lpOverlapped 

); 


如 果 该 函数 成 功 调用 ， 则 返回 0， 否 则 返回 非 0 值 。 其 参数 的 意义 与 函数 ReadFile() 


的 参数 意义 是 一 样 的 。 


外 注意 : 当 使 用 该 函数 写 入 数据 到 文件 时 ， 被 写 入 的 数据 通常 会 被 操作 系统 暂时 保存 在 一 
个 缓冲 区 中 ， 等 到 文件 关闭 或 数据 大 小 与 缓冲 区 大 小 一 样 时 ， 才 会 被 系统 一 并 写 


入 文件 所 在 的 物理 磁盘 中 。 
例如 ， 用 户 使 用 API 函数 对 创建 的 文件 进行 读 写 操作 。 代 码 如 下 : 
BE // 省 略 部 分 代码 
HANDLE handle; /7 定义 文件 句柄 
char buffer[100]; // 定 义 缓冲 区 
int i; // 接 收 实际 操作 的 字 节 数 
CString str; // 定 义 字符 串 变量 


handle=: :CreateFile("C:\ 例 子 .txt", 0, FILE SHARE DELETE| FILE SHARE READ| 


FILE SHARE WRITE, NULL, CREATE ALWAYS, FILE ATTRIBUTE ARCHIVE| 

FILE ATTRIBUTE SYSTEM,NULL); // 创 建文 件 
if(handle==-1) // 判 断 文件 是 否 创 建成 功 
下 


MessageBox (" 文 件 创建 失败 ! ") ; 
， 


else 
if(::ReadFile (handle,sbuffer,100,i,NULL)) // 读 取 文 件数 据 到 指定 缓冲 区 中 
下 
str.Format ("实际 读 取 到 ds\n",i) 7 // 格 式 化 字符 串 
MessageBox (str); 
: :WriteFile (handle, str.GetBuff(1),sizeof (str),i,NULL); 
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// 将 字符 串 写 入 文件 中 


e158 
上 
MessageBox (" 读 取 文 件 失败 ! "); 
} 


} 


在 上 面 的 代码 中 ， 只 有 当 程 序 关 闭 时 ， 系 统 才 会 将 字符 串 数据 写 入 文件 所 在 的 物理 磁 
盘 中 。 如 果 用 户 希 望 数据 被 立刻 写 入 文件 所 在 的 磁盘 中 时 , 可 以 使 用 函数 FlushFileBuffers() 
将 数据 强制 写 入 文件 中 。 该 函数 原型 如 下 : 

BOOL FlushFileBuffers (HANDLE hFile); 


该 函数 的 唯一 参数 hFile 表示 被 操作 文件 的 对 象 句柄 。 例 如 ， 将 上 面 示例 程序 中 的 数 
据 立 刻写 入 文件 ， 代 码 如 下 : 
es // 省 略 部 分 代码 
if(::ReadFile (handle, gbuffer,100, i,NULL) ) // 读 取 文 件数 据 到 指定 缓冲 区 中 

str.Format (" 实 际 读 取 到 ds\n",i)7 // 格 式 化 字符 串 
MessageBox (str); 
::WriteFile (handle, str.GetBuff (1),sizeof (str),i,NULL); 

// 将 字符 串 写 入 文件 中 
:: FlushFileBuffers (handle); // 强 制 向 文件 中 写 入 数据 
lh 


// 省 略 部 分 代码 

通过 以 上 代码 ， 程 序 会 将 缓冲 区 中 的 数据 立刻 写 入 指定 文件 中 。 这 样 做 ， 可 以 避免 数 
据 的 丢失 ， 加 强 了 数据 的 安全 性 。 

用 户 关闭 文件 的 操作 可 以 通过 API 函数 CloseHandle0， 该 函数 可 以 关闭 任何 对 象 的 句 
柄 。 其 原型 如 下 : 

BOOL CloseHandle (HANDLE hObject ) 7 

该 函数 只 有 一 个 参数 ， 即 需要 关闭 的 对 象 句 柄 。 例 如 ， 用 户 操作 完 文件 后 ， 需 要 关闭 
该 文件 ， 使 用 该 函数 进行 文件 的 关闭 操作 。 代 码 如 下 : 


3 // 省 略 部 分 代码 
handle=: :CreateFile("C:\ 例 子 .txt", 0, FILE SHARE DELETE| FILE SHARE READ| 
FILE SHARE WRITE, NULL, CREATE ALWAYS, FILE ATTRIBUTE ARCHIVE| 


FILE ATTRIBUTE SYSTEM,NULL); /7 创建 文件 
> 过 // 省 略 部 分 代码 
::CloseHandle (handle) // 关 闭 对 象 句柄 
区 // 省 略 部 分 代码 


如 果 用 户 使 用 的 文件 创建 函数 是 MFC 中 库 函 数 ， 同 样 可 以 使 用 函数 CloseHandleO 进 
行 关闭 。 因 为 在 每 个 对 象 中 均 包 含 了 一 个 表示 该 对 象 句柄 的 变量 m_hWnd。 例 如 ， 用 户 使 
用 CFile 类 创建 文件 ， 然 后 使 用 该 函数 进行 关闭 ， 代 码 如 下 : 


CFile file("C:\ 例 子 .txt",CFile:modeReadWrite); // 创 建文 件 对 象 
es // 省 略 部 分 代码 
::CloseHandle (file.m hWnd); // 关 闭 对 象 句柄 
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通过 本 节 的 学 习 ， 用 户 应 该 了 解 并 能 够 使 用 API 函数 进行 基本 的 文件 操作 编程 。 由 于 
本 章 中 的 实例 程序 只 涉及 到 一 些 基本 的 API 函数 ， 所 以 ， 在 这 里 不 再 次 述 。 如 果 用 户 愿意 
继续 学 习 其 他 作用 的 API 函数 ， 可 以 翻阅 一 些 关 于 API 讲解 的 参考 书 。 


8.3 ”内 存 映射 文件 


内 存 映 射 文件 是 与 虚拟 内 存 相 似 的 一 种 内 存 地 址 空间 ， 只 有 在 程序 需要 使 用 时 才 会 将 
该 空间 中 的 内 容 提交 给 物理 磁盘 。 使 用 内 存 映射 文件 不 但 能 减少 读 取 和 写 入 文件 的 时 间 ， 
还 可 以 避免 对 文件 的 多 次 输入 输出 操作 和 为 文件 操作 频繁 地 申请 内 存 缓冲 区 。 


1. 相关 函数 


用 户 在 实际 编程 时 ， 可 以 使 用 API 函数 CreateFileMapping0 打 开 或 者 创建 内 存 映 射 文 
件 对 象 。 该 函数 原型 如 下 : 


HANDLE CreateFileMapping( 
HANDLE hFile, 
LPSECURITY ATTRIBUTES lpFileMappingAttributes, 
DWORD flProtect, 
DWORD dwMaximumSizeHigh, 
DWORD dwMaximumSizeLow, 
LPCTSTR lpName 
); 
该 函数 如 果 调 用 成 功 ， 则 返回 新 创建 的 内 存 映 射 文件 句柄 。 否 则 ， 将 返回 0。 其 中 ， 
参数 意义 如 下 : 
口 参数 hFile 表示 需要 映射 的 文件 对 象 句柄 。 如 果 该 文件 对 象 句柄 已 经 存在 ， 那 么 函 
数 将 建立 该 文件 的 内 存 映 射 对 象 。 否则， 函数 将 建立 一 个 共享 内 存 。 
口 参数 jpFileMappingAttributes 将 指定 该 内 存 映 射 文件 的 安全 属性 ， 在 这 里 设置 为 
NULL。 
口 参数 flProtect 指定 内 存 映 射 文件 的 保护 类 型 ， 其 取 值 如 表 8.8 所 示 。 


表 8.8 内 存 映射 文件 的 保护 类 型 


取 值 意 义 
PAGE READONLY 设置 该 内 存 映射 文件 为 只 读 
PAGE READWRITE 设置 该 内 存 映射 文件 为 可 读 写 


口 参数 dwMaximumSizeHigh 和 dwMaximumSizeLow 共同 指定 该 内 存 映 射 文件 的 长 
度 ， 若 函数 创建 共享 内 存 ， 则 需要 为 这 两 个 参数 指定 值 。 否 则 ， 将 两 个 参数 均 设 
置 为 0， 表 示 创 建 的 内 存 映射 文件 长 度 与 磁盘 上 已 经 存在 的 文件 长 度 一 样 。 
口 参数 lpName 表示 创建 的 内 存 映射 文件 名 。 
当 该 内 存 映 射 文件 创建 成 功 以 后 , 其 他 进程 或 者 程序 可 以 调用 函数 OpenFileMappingO 
根据 内 存 映 射 文件 名 打开 已 经 存在 的 内 存 映射 文件 。 函 数 OpenFileMappingO 原 型 如 下 : 
HANDLE OpenFileMapping( 
DWORD dwDesiredAccess, 
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BOOL bInheritHandle, 
LPCTSTR lpName 
); 
该 函数 调用 成 功 ， 将 返回 打开 的 内 存 映射 文件 对 象 的 句柄 。 否 则 ， 返 回 0。 参 数 意义 
如 下 : 
口 参数 dwDesiredAccess 指定 打开 内 存 映射 文件 的 保护 类 型 。 取 值 如 表 8.9 所 示 。 


表 8.9 内 存 映 射 文件 的 保护 类 型 


取 值 
FILE MAP WRITE 
FILE MAP READ 


意义 
以 可 写 属性 打开 该 内 存 映射 文件 
以 可 读 属 性 打开 该 内 存 映射 文件 


口 参数 bInheritHandle 指定 该 函数 返回 的 句柄 是 否 可 以 被 继承 。 

口 参数 lpName 指定 将 要 打开 的 内 存 映 射 文件 的 文件 名 。 

例如 ， 用 户 创建 并 打开 文件 名 为 1ymlrl 的 内 存 映 射 文件 ， 代 码 如 下 : 
5 // 省 略 部 分 代码 
HANDLE handle; 


handle= ::CreateFileMapping (0,NULL, PAGE READWRITE,0,0,"lymlr1l"); 
// 创 建 命名 的 共享 内 存 
:: OpenFileMapping (FILE MAP WRITE| FILE MAP READ, false,"lymlrl"); 
// 打 开 该 共享 内 存 
// 省 略 部 分 代码 


以 上 代码 创建 了 一 个 名 称 为 lymlrl 的 共享 内 存 ， 并 在 创建 后 将 其 打开 。 当 用 户 打开 内 
存 映 射 文件 成 功 后 ， 需 要 对 该 内 存 映射 文件 进行 存 取 操 作 ， 那 么 用 户 需 要 得 到 该 内 存 映射 
文件 的 内 存 地 址 。 实 现 该 功能 的 API 函数 是 MapViewOfFile0， 该 函数 原型 如 下 : 


LPVOID MapViewOfFile( 


HANDLE hFileMappingObject, // 内 存 映射 文件 的 对 象 句柄 

DWORD dwDesiredAccess, // 指 定 保护 类 型 

DWORD dwFileOffsetHigh, // 从 文件 的 指定 地 址 开始 映射 

DWORD dwFileOffsetLow, // 指 定 映射 停止 的 文件 指针 位 置 

DWORD dwNumberOfBytesToMap // 需 要 映射 的 字 节 数 , 若 为 0 则 映射 整个 文件 


MR 

如 果 该 函数 调用 成 功 ， 则 返回 内 存 映 射 文件 的 内 存 地 址 。 否 则 ， 将 返回 NULL。 当 用 
户 不 再 使 用 该 内 存 映射 文件 时 ， 应 将 其 对 象 关 闭 。 实 现 映射 文件 对 象 关闭 的 函数 是 
UnmapViewOfFile0。 该 函数 原型 如 下 : 


BOOL UnmapViewOfFile( 
LPCVOID lpBaseAddress 
); 


该 函数 调用 成 功 ， 则 返回 tue。 和 否则 ,返回 false。 其 参数 lpBaseAddress 表示 内 存 映射 
文件 的 内 存 地 址 。 


2. 示例 代码 


用 户 通过 8.2 节 对 内 存 映 射 文件 的 介绍 以 及 相关 的 编程 操作 函数 的 讲解 ， 对 内 存 映 射 
文件 的 作用 和 操作 已 经 有 了 初步 的 认识 。 在 本 节 中 将 通过 编写 一 个 内 存 映 射 文件 实例 ， 向 
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户 进一步 介绍 内 存 映射 文件 的 编程 操作 。 例 如 ， 用 户 向 一 个 共享 内 存 中 写 入 数据 后 ， 再 
关闭 该 内 存 映 射 文件 。 代 码 如 下 : 


a // 省 略 部 分 代码 
HANDLE handle; // 定 义 句柄 
LPVOID addy // 表 示 映 射 地 址 
char text[3]={a,b,c}; // 写 入 文件 的 数据 
handle= ::CreateFileMapping(0,NULL, PAGE READWRITE,0,0,"lymlrl"); 

// 创 建 命名 的 共享 内 存 
:: OpenFileMapping (FILE MRP WRITE| FILE MRP READ,false,"lymlr1"); 

// 打 开 该 共享 内 存 
add=:: MapViewOfFile (handle，FILE MAP_WRITE,0,0,0);// 映 射 文件 
strcpy (add, gtext); // 复 制 数 据 到 映射 文件 

:: UnmapViewOfFile (add); // 撤 销 映射 


用 户 从 代码 中 可 以 看 到 ， 使 用 内 存 映射 文件 进行 数据 输入 输出 时 可 以 使 用 数据 复制 函 
数 strepy0 实 现 数 据 的 保存 ， 减 少 程序 对 文件 的 访问 。 


外 注意 : 在 本 章 实例 中 ， 将 会 使 用 内 存 映射 文件 对 文件 数据 进行 读 取 和 保存 。 所 以 ， 用 户 
应 该 重视 本 节 关 于 内 存 映射 文件 的 相关 内 容 。 


8.4 使 用 Socket 传输 文件 


本 节 将 讲述 本 章 的 核心 功能 ， 使 用 Socket 〈 套 接 字 ) 编程 实现 文件 数据 的 传输 。 其 基 
本 过 程 是， 程序 在 发 送 文件 时 ， 首 先 将 本 地 文件 数据 读 取 到 指定 缓冲 区 后 ， 再 使 用 套 接 字 
将 缓冲 区 内 容 发 送 到 远程 计算 机 上 。 当 程序 接收 文件 时 ,首先 将 数据 接收 并 存 入 缓冲 区 中 ， 
然后 创建 相应 文件 并 将 缓冲 区 内 容 写 入 文件 即 可 。 


8.4.1 创建 套 接 字 


本 节 中 创建 套 接 字 的 方法 与 前 面 章节 中 创建 套 接 字 的 方法 一 样 , 所 以 , 本 节 不 再 獒 述 。 
客户 端 创建 套 接 字 ， 代 码 如 下 : 


本 // 省 略 部 分 代码 

SOCKET s; // 定 义 套 接 字 对 象 
sockaddr_ in addr; // 定 义 网 络 地 址 结构 对 象 
addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin port=htons (100); // 使 用 100 号 端口 


addr.sin_addr.S_un.S_addr=inet_addr (snmtpip);  // 转 换 对 方 计算 机 的 IP 地 址 
s=: :Socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); ”// 创 建 套 接 字 


// 省 略 部 分 代码 
如 果 是 服务 器 端 ， 则 创建 套 接 字 之 后 还 需要 将 套 接 字 与 本 地 地 址 相 绑 定 ， 代 码 如 下 : 
二 // 省 略 部 分 代码 
SOCKET s7 // 定 义 套 接 字 对 象 
sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 
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adqr .sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin port=htons (100); 
adqr .sin addr.s un.S addr=inet addr(127.0.0.1); 

// 假 设 服务 器 地 址 为 127.0.0.1 


s=: :Socket (AF_INET, SOCK STREAM,IPPROTO TCP); // 创 建 套 接 字 

::bind(s, (sockadqdr *)addr, sizeof (addr)); // 绑 定 套 接 字 

: listen(s,3); // 监 听 套 接 字 
网 // 省 略 部 分 代码 

对 于 客户 端 而 言 ， 套 接 字 创建 成 功 以 后 ， 便 可 以 连接 服务 器 。 代 码 如 下 : 
// 省 略 部 分 代码 

s=: :socket (AF_INET, SOCK STREAM, IPPROTO TCP); // 创 建 套 接 字 

::connect(s, (sockaddr *)addr, sizeof (addr)); // 连 接 服务 器 
// 省 略 部 分 代码 


对 于 服务 器 而 言 ， 当 程序 在 指定 端口 上 发 现 有 客户 端 发 送 的 连接 请 求 到 来 时 ， 则 调用 
函数 acceptO 对 该 连接 请 求 进行 应 答 ， 并 返回 一 个 新 的 套 接 字 句柄 。 代 码 如 下 : 


SOCKET s,sl; // 定 义 套 接 字 对 象 
sockaddr in addr27 // 定 义 网 络 地 址 结构 对 象 
| // 省 略 部 分 代码 
s=: :Socket (AF_INET, SOCK_STREAM, IPPROTO TCP); // 创 建 套 接 字 
::bind(s, (sockaddr *)addr, sizeof (addr)); // 绑 定 套 接 字 
vs 和 SG 《二 六 // 监 听 套 接 字 
s1=: :accept (s, ( sockaddr *)addr2, sizeof (addr2); // 应 答 连接 请 求 

SE // 省 略 部 分 代码 


用 户 可 以 从 上 面 的 代码 中 看 到 , 如 果 函 数 acceptO 调 用 成 功 , 则 返回 一 个 新 的 套 接 字句 
柄 并 且 获 得 与 其 连接 的 客户 端 地 址 信息 。 服 务 器 与 客户 端的 数据 需要 依靠 函数 accept0 返 回 
的 新 套 接 字句 柄 进行 传输 。 


8.4.2 关闭 套 接 字 


当 用 户 不 再 需要 使 用 已 经 创建 的 套 接 字 以 后 , 可 以 调用 API 函数 CloseHandle0 对 其 进 
行 关闭 。 该 函数 原型 如 下 : 

BOOL CloseHandle (HANDLE hObject ); 

该 函数 执行 成 功 ， 则 返回 tue。 和 否则 ， 返 回 false。 参 数 hObject 表示 需要 关闭 的 对 象 
句柄 。 例 如 ， 用 户 关 闭 上 面 代码 中 创建 的 套 接 字 句柄 s， 代 码 如 下 : 


要 // 省 略 部 分 代码 

SOCKET s; // 定 义 套 接 字 对 象 

sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 

addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin port=htons (100) 7 // 使 用 端口 号 100 


addr.sin addr.S_ un.S_addr=inet addr (smtpip);  ”// 转 换 对 方 计算 机 的 IP 地 址 
s=: :Socket (AF_INET, SOCK_STREAM, IPPROTO_TCP) ; ”// 创 建 套 接 字 


::CloseHandle(s): // 关 闭 套 接 字 
如 果 用 户 在 代码 中 使 用 MFC 中 创建 套 接 字 的 类 或 者 方法 创建 套 接 字 句柄 s， 则 使 用 
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CloseHandle0 函 数 进行 关闭 时 ， 应 该 将 参数 形式 修改 为 “对 象 m hWnd”。 
8.4.3 ”发 送 文件 


当 客户 端 连 接 服务 器 成 功 以 后 ， 客 户 端 便 可 以 向 服务 器 传输 文件 数据 了 。 同 样 ， 对 于 
服务 器 而 言 ， 也 可 以 通过 API 函数 accept0 返 回 的 新 套 接 字句 柄 向 客户 端 传输 或 接收 文件 
数据 。 由 于 在 本 实例 中 ， 服 务 器 和 客户 端 都 具有 发 送 和 接收 文件 数据 的 功能 ， 所 以 在 本 节 
中 只 针对 客户 端 发 送 文件 功能 进行 讲解 。 代 码 如 下 : 


本 7/ 省略 部 分 代码 

SOCKET s; // 定 义 套 接 字 对 象 

char text[100] // 定 义 缓冲 区 

CFile file("C:\ 例 子 .txt",CFile:modeReadWrite); // 创 建文 件 对 象 

CString str; // 定 义 字符 串 

sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 

addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
adqdr .sin port=htons (100) 7 // 使 用 端口 号 100 


addr.sin addr.S_un.S_addr=inet_addr (smtpip) ; // 转 换 服务 器 IP 地 址 
s=: :Socket (AF_INET, SOCK_STREAM, IPPROTO_TCP) ; / /创建 套 接 字 
if(::connect(s, (sockaddr *)addr, sizeof (addr))!=-1) 


// 连 接 服务 器 
str=file.GetFileTitle(); // 获 取 文件 名 “例子 .txt" 
::send(s,str.GetBuffer (1), sizeof (str)); // 发 送 文件 名 到 服务 器 
file.Read (text, 100); // 读 取 文件 
while (text!=EOF) // 判 断 文件 是 否 结束 

{ 
file.Read (text, 100); // 读 取 100 字 节 的 文件 数据 
::send(s, &text, 100); // 发 送 文件 数据 到 服务 器 
} 
::CloseHandle (file.m hWnd); // 关 闭 对 象 句柄 


:: CloseHandle(s) 7 


在 代码 中 , 用 户 创建 一 个 文件 对 象 fle, 然后 调用 函数 GetFileTitleO 获 取 该 文件 的 文件 
标题 (包括 文件 的 后 级 名 〉。 通 过 函数 send0 将 获取 的 文件 标题 发 送 到 服务 器 ， 以 便服 务 
器 创建 相同 文件 名 的 文件 。 最 后 ， 程 序 循环 读 取 文 件 内 容 到 缓冲 区 text 中 ， 并 且 将 每 次 读 
取 到 的 数据 发 送 到 服务 器 。 


和 注意 : 在 程序 中 ， 是 以 字符 EOF 标识 文件 结束 。 
8.4.4 接收 文件 
当 客 户 端 将 文件 数据 发 送 到 服务 器 以 后 ， 服 务 器 应 该 负责 接收 文件 并 且 在 本 地 磁盘 中 


创建 相应 文件 接收 数据 。 接 收 时 ， 服 务 器 第 一 次 接收 到 的 数据 应 该 为 文件 名 ， 后 面 接收 到 
的 数据 均 是 文件 数据 。 代 码 如 下 : 
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a // 省 略 部 分 代码 

SOCKET s,s1; // 定 义 套 接 字 对 象 
sockaddr in addr27 // 定 义 网 络 地 址 结构 对 象 
char text[100]={0}; // 定 义 缓冲 区 

s=: :Socket (RE_INET, SOCK STREAM, TPPROTO_TCP) ;  // 创 建 套 接 字 
::bind(s, (sockaddr *)addr, sizeof (addr)); // 绑 定 套 接 字 

:: listen(s,3); // 监 听 套 接 字 


sl=: :accept (s, ( sockaddr *)addr2, sizeof (addr2); // 应 答 连 接 请 求 
if (sl1!=NULL) 
€ 
:recy{(sl, ttexte100)? // 接 收文 件 名 
if(text!=0) 
{ 


CFile file( (LPSTR) text，CFile:modeReadWrite); // 根 据 文件 名 创建 文件 


if (file!=NULL) // 判 断 文件 是 否 创建 成 功 
while(text!=0) // 循 环 接收 数据 
::recv(sl, &text,100); // 接 收 数据 
file.Write(&text,100) 7 // 写 入 文件 
人 村 区 // 关 闭 文 件 或 套 接 字 句柄 


::CloseHandle(s) 7 
::CloseHandle (s1); 
} 
} 

} 

以 上 程序 表示 服务 器 成 功 应 答 客 户 端的 连接 请 求 后 ， 可 以 通过 返回 的 新 套 接 字 与 客户 
端 进行 数据 传输 。 首 先 ， 服 务 器 接收 文件 名 ， 如 果 接 收 的 文件 名 不 为 NULL， 则 创建 相同 
名 称 的 文件 。 然 后 ， 程 序 循环 接收 客户 端 发 送 的 文件 数据 ， 并 将 这 些 数据 写 入 新 创建 的 文 
件 中 。 


外 注意 : 在 服务 器 接收 实例 程序 中 ， 本 节 使 用 了 文件 结束 符 EOF 或 者 是 0 来 表示 文件 结 
束 。 如 果 用 户 有 其 他 方法 在 客户 端 和 服务 器 之 间 约 定 文件 的 结束 标志 ， 那 么 用 户 
可 以 自行 尝试 将 以 上 代码 进行 修改 . 调试 程序 , 查看 自 定义 的 约定 方式 是 否 成 立 。 


8.5 服务 器 代码 


通过 前 面 的 学 习 ， 用 户 已 经 对 文件 在 客户 端 和 服务 器 之 间 进 行 传输 的 基本 原理 以 及 方 
法 有 了 了 解 。 在 本 节 中 ， 将 通过 编写 服务 器 代码 向 用 户 详细 讲解 服务 器 接收 文件 数据 和 发 
送 文件 数据 功能 的 具体 实现 方法 以 及 实例 代码 。 


8.5.1 服务 器 功能 


在 本 章 实 例 中 ， 服 务 器 应 当 具有 向 客户 端 发 送 文件 以 及 接收 客户 端 文件 数据 的 功能 。 
当 服 务 器 接收 到 客户 端的 文件 数据 以 后 ， 首 先 在 本 地 目录 中 创建 一 个 与 接收 文件 名 相同 的 
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文件 。 当 文件 创建 成 功 以 后 ， 通 过 循环 方式 接收 客户 端 发 送 的 文件 数据 ， 并 将 这 些 文件 数 
据 写 入 新 文件 中 ， 然 后 关闭 文件 。 

在 服务 器 中 还 需要 实现 一 个 功能 ， 即 与 客户 端 用 户 进行 交流 的 平台 。 这 个 功能 与 第 6 
章 中 所 讲述 的 网 络 通信 器 的 功能 一 样 能 够 互相 发 送 消息 。 因 此 ， 在 本 节 中 关于 这 个 功能 的 
实现 原理 就 不 再 向 用 户 进行 讲述 。 如 果 用 户 对 该 功能 的 实现 方法 等 还 不 熟悉 ， 请 复习 第 6 
章 中 的 内 容 。 


8.5.2 创建 服务 器 对 话 框 

服务 器 端 功 能 的 实现 代码 将 在 VC 环境 下 进行 编写 和 调试 。 首 先 ， 用 户 需 要 定义 服务 
器 端 界面 是 基于 对 话 框 模式 。 

1. 创建 工程 


用 户 使 用 VC 创建 基于 MFC 应 用 程序 的 服务 器 工程 , 可 以 使 用 VC 的 工程 向 导 进 行 工 
程 创建 。 其 创建 步骤 如 下 。 

(1) 新 建 一 个 工程 ， 工 程 属性 为 MFC AppWizard[exe]， 工 程 名 称 修改 为 “服务 器 ”， 
如 图 8.1 所 示 。 


文件 工程 | 工作 区 | 其 它 文档 | 
[BATL COM AppWizard 工程 名 称 (NJ: 


Cluster Resource Type Wizard 原 S 吕 
AppWizard 2 
Database Project 

巾 DevStudio Add-in Wizard 


位 置 (CQ): 
Extended Stored Proc Wizard ICADOCUMENTS AND SETTINGS' 到 | 
1SAPI Extension Wizard 


Makefile 
MFC ActiveX ControlWizard 


MFC AppWizard (dil f 创建 新 的 工作 空间 四 
个 茫 加 到 当前 工作 空间 欠 
SNew Database Wizard 属于 加 I 
Tf Utility Project - 
Win32 Application 
Win32 Console Application 
加 Win32 DynamicLink Library 
到 Win32 Static Library 


8.1 新 建 工程 对 话 框 


(2) 单 击 “ 确 定 ”按钮 ， 进 入 应 用 程序 向 导 步 骤 1， 选 择 应 用 程序 类 型 ， 如 图 8.2 
所 示 。 

(3) 单 击 * 下 一 步 ? 按 钮 , 进入 应 用 程序 向 导 步 又 2, 选择 应 用 程序 需要 Windows Sockets 
的 支持 ， 如 图 8.3 所 示 。 

(4) 单 击 “ 完 成 ”按钮 ， 完 成 服务 器 工程 的 创建 。 
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了 王 C 应 用 程序 向 导 一 步 要 1 


必修 要 他 建 的 应 用 程序 类 型 是 : 


三 单 文档 加 
多 本 文档 多 


您 的 资源 使 用 的 语言 是 : 
中 文中 国 | APPWZCHS.DLU 习 


< 上 =- 步 [下 - 步 | 守 | 到 消 
图 8.2 选择 应 用 程序 类 型 为 对 话 框 模式 


BFC 应 用 程序 向 导 步骤 2 共 4 步 

您 是 否 希望 包含 
万 "只 于 "对 话 杠 
厂 上 下 文 相关 帮助 
F 30 外 观 

您 希望 包含 什么 其 他 支持 ? 
厂 自动 操作 凯 
FActiveX 控件 四 

您 希望 包含 WOSA 支持 吗 ? 


F Windows Sockets [W) 


对 话 框 的 标题 是 ， 
服务 品 


5 完成 取消 
图 8.3 选择 应 用 程序 支持 套 接 字 功能 


2. 设计 界面 


用 户 需 要 根据 8.2.1 节 中 所 示 的 服务 器 功能 进行 服务 器 界面 设计 。 首 先 ， 打 开工 程 资 
源 管理 器 中 的 对 话 框 资源 ， 如 图 8.4 所 示 。 


外 注意 : 在 图 8.4 中 所 示 对 话 框 界面 是 在 VC 资源 管理 器 中 自动 生成 的 对 话 框 界面 。 在 实 
际 编程 中 ， 需 要 用 户 向 该 界面 中 拖 动 各 种 控件 以 满足 其 功能 。 
然后 ， 用 户 拖 动 控件 到 对 话 框 面板 上 相应 位 置 ， 并 调整 其 大 小 。 服 务 器 界面 的 设计 效 
果 如 图 8.5 所 示 。 


用 户 在 对 话 框 界面 中 ， 总 共 放 置 了 7 个 控件 。 关 于 这 些 控 件 的 D、 属 性 以 及 作用 如 表 
8.10 所 示 。 
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111 - 了 icrosoft yisual C++ — [II1-rc — IDD MYIIL DIALOG (Dialog)] 


国文 件 WD 钨 名 EL) 二 看 QV) 插入 GD) 工程) 组建 中 布局 LU) 工具 GD 窗口 四 帮助 0 
前 芒 目 纯 上 会 下 | 二 -二 -| 吧 员 车 名 


CMy111DIg 了 可 An class members] jj © CMy111DIg 
EE 
S11 resources 
= 加 Dialog 
起 国 Icon 
5 国 Swing Table 
二 Version 


8.5 ”服务 器 界面 效果 


表 8.10 控件 ID 以 及 属性 
控件 ID 


控件 作用 
IDC_SAVE 保存 接收 到 的 文件 
IDC_LIULAN 发 送 文件 的 位 置 
IDC CLEAR. 清空 信息 
IDC_EDIT1 显示 服务 器 和 客户 端 之 间 聊 天 信息 
IDC STATIC 标识 作用 
IDC_EDIT2 服务 器 将 发 送 的 消息 
IDC_SEND 发 送 消息 
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本 节 向 用 户 介绍 了 服务 器 工程 的 创建 方法 以 及 服务 器 界面 设计 所 需 的 控件 类 型 以 及 
作用 等 ,基本 完成 了 服务 器 界面 的 设计 步骤 。 但是, 要 让 该 服务 器 对 话 框 实现 原 定 的 功能 
还 需要 用 户 实现 每 一 个 控件 的 响应 函数 。 对 于 实现 控件 的 响应 函数 将 在 8.5.3 节 中 讲解 。 


8.5.3 程序 初始 化 


在 本 节 中 ， 将 通过 界面 初始 化 函数 向 用 户 介绍 该 界面 中 各 个 控件 的 显示 状态 以 及 服务 
器 端 套 接 字 的 初始 化 等 。 


1. 控件 初始 化 状态 


当 界 面 初始 化 时 ， 用 户 应 该 使 界面 中 部 分 控件 处 于 禁用 状态 。 所 以 ， 用 户 需 要 在 窗口 
初始 化 函数 中 编写 相关 程序 实现 控件 禁用 功能 。 代 码 如 下 : 


BOOL CMyD1g::OnInitDialog() 
. 


CDialog::OnInitDialog () 7 

RSSERT ( (IDM ABOUTBOX & 0xFFF0) == IDM ABOUTBOX) 7 

ASSERT (IDM ABOUTBOX < 0xF000) 7 

CMenu* pSysMenu = GetSystemMenu (FALSE); 

sia // 省 略 部 分 代码 
SetIcon (m hIcon，TRUE) ; 
SetIcon(m hIicon, FALSE); 
GetDlgItem (IDC EDIT1)->EnableWindow (false); // 禁 用 信息 显示 窗口 


GetDlgItem(IDC SAVE)->EnableWindow (false); // 禁 用 保存 文件 按钮 
GetDlgItem(IDC LIULAN)->EnableWindow (false); // 禁 用 发 送 文件 按钮 
GetDlgItem(IDC CLEAR) ->EnableWindow (false) 7 // 禁 用 清除 信息 按钮 
3 // 省 略 部 分 代码 


return TRUE; 
} 


将 以 上 代码 在 VC 编译 器 中 进行 编译 、 运 行 。 程 序 窗口 初始 化 界面 ， 如 图 8.6 所 示 。 


ma | 


8.6 ”窗口 初始 化 效果 


全 注意 : 程序 窗口 运行 时 ， 主 要 的 功能 按钮 均 处 于 禁用 状态 。 这 样 是 为 了 使 用 户 在 代码 学 
习 中 能 深入 了 解 各 个 功能 的 具体 实现 方法 。 
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2. 初始 化 套 接 字 


用 户 在 程序 初始 化 函数 中 ， 还 应 该 添加 套 接 字 初始 化 代码 ， 以 便 程 序 运 行 时 完成 监听 
端口 等 功能 的 准备 。 代 码 如 下 : 


BOOL CMVYD1g::OnInitDialog() 
{ 
CDialog::OnInitDialog (); 
RSSERT ( (IDM ABOUTBOX & 0xFFF0) == IDM ABOUTBOX); 
ASSERT (IDM ABOUTBOX < 0xF000); 
CMenu* pSysMenu = GetSystemMenu (FALSE); 


a // 省 略 部 分 代码 
char 七 [100]7 
DWORD ss=MAKEWORD (2,0); // 初 始 化 套 接 字 库 
::WSAStartup (ss, &data); 
SOCKET s; // 定 义 套 接 字 对 象 
sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 
addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 
addr .sin port=htons (100) 7 
::gethostname (&t); // 获 得 本 机 名 
hosent *host=gethostbyname (&t) // 从 本 机 名 获取 主机 信息 结构 
addr.sin addr.s un.s addr= inet addr (host->h adqr list); 
// 设 置 网 络 字 节 顺序 的 IP 地 址 
s=: :socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); ”// 创 建 套 接 字 
::bind(s, (sockaddr *)addr, sizeof (addr)); // 绑 定 套 接 字 
: listen(s,3); // 监 听 套 接 字 
:: WSAAsyncSelect(s, this->m hWnd,WM SOCKT,FD READ|FD ACCEPT); 
// 设 置 异步 套 接 字 
// 省 略 部 分 代码 


在 代码 中 , 用户 可 以 看 到 程序 调用 函数 WSAAsyncSelect0 将 监听 套 接 字 设 置 为 异步 模 
式 。 当 有 相关 的 套 接 字 事 件 发 生 时 ， 程 序 便 会 向 窗口 发 送 自 定义 消息 WM_SOCKT。 消 息 
WM_SOCKT 是 在 工程 头 文件 中 定义 的 自 定义 消息 。 代 码 如 下 : 

#if MSC VER > 1000 

#pragma once 

#endif // MsC VER > 1000 

#define WM SOCKT WM USER+1 // 定 义 自 定义 消息 

class CMVYD1g : public CDialog 


// 省 略 部 分 代码 
} 


用 户 在 头 文件 中 ， 除 了 定义 自 定义 消息 以 外 ， 还 需要 定义 消息 响应 函数 。 代 码 如 下 : 
class CMVY2D1g : public CDialog 
1 


public: 
CMy2D1g (CWnd* PParent = NULL); // standard constructor 
Cstring ip; 
SOCKET s; / /服务 器 监听 套 接 字 
SOCKET sl; // 服 务 器 数据 收发 套 接 字 
int port; 


HFILE hfile; 
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char buff[100]; 
CString str; 
char str12[100]; 
HWND h; 
protected: 
virtual void DoDataExchange (CDataExchange* pDX); 
public: 
HICON m hIcon; 
sockaddr in addr7 
WSADATA data; 


int i; 
int n; 
afx msg void Onsocktl (WPARAM wParam, LPARAM lParam); 
// 套 接 字 消息 响应 函数 
afx msg void OnTimer (UINT nIDEvent); 
afx msg void OnClose(); 
// 省 略 部 分 代码 


} 
然后 ， 用 户 还 需要 在 消息 映射 宏 中 添加 套 接 字 消息 的 消息 映射 项 。 代 码 如 下 : 
a // 省 略 部 分 代码 
BEGIN MESSAGE MRP(CMY2D1g，CDialog) 

//{{AFX MSG MAP (CMy2D1g) 

ON WM SYSCOMMAND() 

ON_WM PRINT () 

ON_WM QUERYDRAGICON () 

ON BN CLICKED(IDC BUTTON2, OnButton2) 

ON_BN CLICKED(IDC BUTTON3, OnButton3) 

ON BN CLICKED(IDC BUTTON1, OnButton1) 

ON_MESSAGE (WM_SOCKT, Onsockt1) // 添 加 消息 映射 项 

ON_WM TIMER() 

ON WM CLOSE () 

//}}AFX MSG MAP 
END MESSAGE MRP () 
| // 省 略 部 分 代码 

用 户 在 工程 中 添加 上 面 的 代码 以 后 ， 已 经 为 自 定义 套 接 字 消息 添加 了 消息 响应 函数 。 
下 面 ， 将 向 用 户 介绍 文件 接收 和 发 送 功能 的 实现 方法 。 


8.5.4 代码 分 析 

在 服务 器 端 ， 用 户 所 要 实现 的 功能 是 接收 客户 端 发 送 的 文件 ， 向 客户 端 发 送 文件 以 及 
与 客户 端 进行 文字 通信 。 下 面 将 分 别 向 用 户 讲解 这 3 个 功能 的 实现 方法 。 

1. 接收 文件 


在 服务 器 对 话 框 中 ， 如 果 程 序 检测 到 客户 端 发 送 的 数据 到 来 时 ， 会 将 界面 中 接收 按钮 
设置 为 可 用 状态 。 服 务 器 接收 文件 的 功能 代码 是 在 套 接 字 消息 响应 函数 Onsockt10 中 进行 
实现 ， 处 理 的 套 接 字 事件 为 FD READ。 代 码 如 下 


void CMYD1g: :Onsocktl (WPARAM wParam, LPARAM lParam) 


Switch (lParam) 
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case FD RERD: // 设 置 读 取 事件 
GetDlgItem(IDC SAVE)->EnableWindow (true); // 使 用 保存 文件 按钮 
GetD1gItem (IDC_CLERR) ->EnableWindow (true); // 使 用 保存 文件 按钮 


sl=::accept (s, ( sockaddr *)addr2,sizeof(addr2); ”// 应 答 连接 请 求 
} 

} 

当 程 序 在 套 接 字 消息 响应 函数 中 检测 到 相应 的 套 接 字 事 件 时 ， 将 对 话 框 中 接收 文件 按 
钮 设置 为 可 用 状态 。 这 时 ， 用 户 可 以 通过 文件 保存 对 话 框 CFileDialog 类 ， 为 将 要 接收 的 文 
件 选择 其 保存 路 径 。CFileDialog 类 是 MFC 中 的 一 个 类 ， 其 负责 显示 文件 打开 或 者 保存 对 
话 框 。 在 本 例 中 ， 用 户 需要 使 用 文件 保存 对 话 框 ， 所 以 ， 程 序 中 使 用 该 类 显示 文件 保存 对 
话 框 。 代 码 如 下 : 

CFileDialog filedlg (false); // 定 义 文件 对 话 框 对 象 ， 并 将 其 指定 为 文件 保存 对 话 框 

filed1g.DoModal (); // 显 示 文件 保存 对 话 框 

如 果 用 户 将 其 构造 函数 的 参数 设置 为 false， 则 表示 用 户 打 开 的 是 一 个 文件 保存 对 话 
框 。 否则 ， 程 序 将 显示 文件 打开 对 话 框 。 文 件 保存 对 话 框 如 图 8.7 所 示 。 

文件 对 话 框 显 示 以 后 ， 用 户 可 以 通过 其 成 员 函 数 GetPathName() 获 取保 存 路 径 。 如 果 
该 函数 调用 成 功 ， 则 返回 文件 的 路 径 名 ， 返 回 类 型 为 字符 串 类 型 。 该 函数 原型 如 下 : 


CString GetPathName () const7 


在 工程 中 ， 用 户 可 以 通过 双击 控件 为 “接收 文件 ”按钮 添加 消息 响应 函数 ， 并 将 响应 
函数 名 称 设置 为 OnSave0， 如 图 8.8 所 示 。 


Member function name: 
oa 和 


已 Cancel 


Message: BN_CLICKED 
Object ID; IDC_SAVE 


图 8.7 文件 保存 对 话 框 8.8 为 “接收 文件 ”按钮 添加 消息 响应 函数 


用 户 单 击 OK 按钮 ， 完 成 响应 函数 的 添加 以 后 ， 便 可 以 在 函数 OnSave0 中 ， 添 加 服务 
器 接收 并 保存 文件 的 相关 代码 。 代 码 如 下 : 
void CMYD1g::OnSave () 
本 
{ 
::recv(sl, gtext,100); // 接 收文 件 名 


if (text!=0) 
a 
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CFileDialog filedlg(false); 
filedlg.m ofn.lpstrFileTitle= (LPSTR) text; 
if (filedlg.DoModal ()==IDOK) 

CString str; 
str=filedlg.GetPathName (); 
str+=(LPSTR) text; 

CFile filel(str, CFile::modeReadWrite); 

if (file!=NULL) 

{ 

while (text!=0) 
1 


::recv(sl, gtext,100); 
file.Write (gtext,100); 
} 
file.Close(); 


// 定 义 文件 对 话 框 对 象 
// 在 对 话 框 中 显示 接收 到 的 文件 名 
// 显 示 文件 保存 对 话 框 


// 定 义 字符 串 变量 

// 获 取 文 件 保存 路 径 

// 连 接 文件 路 径 和 文件 名 
// 根 据 文件 名 创建 文件 
// 判 断 文件 是 否 创建 成 功 


// 循 环 接收 数据 


// 接 收 数据 
// 写 入 文件 


// 关 闭 文件 或 套 接 字句 柄 


GetD1gItem(IDC_SAVE) ->SetWindowText (" 发 送 完成 ") ; // 提 示 用 户 接收 数据 完成 


} 
} 
于 


在 代码 中 ， 用 户 首先 接收 文件 名 ， 然 后 根据 该 文件 名 创建 文件 并 且 将 文件 路 径 设置 为 
指定 路 径 。 文 件 创 建成 功 ， 则 向 该 文件 中 循环 写 入 数据 。 最 后 ， 关 闭 文件 以 及 套 接 字句 柄 。 


2. 发 送 文件 


当 服 务 器 用 户 需要 向 客户 端 发 送 文件 时 ， 可 以 通过 发 送 文件 按钮 执行 该 功能 。 首 先 ， 
使 用 应 用 程序 向 导 对 话 框 为 其 添加 消息 响应 函数 Onliulan0， 如 图 8.9 所 示 。 


Message Maps | Member Variables | Automation | Activex Events | Class mto | 


Description: Indicates the user clicked a button 


Project: Class name: 

服务 器 可 [cMyoig 
C4 服务 器 (服务 器 Dig.h, C4..\ 服 务 器 (服务 器 Dig.cpp 

Object IDs: Messages: 

CMyDig 

DC_CU 

全 Member function name: 

IDC_ LIULAN oo 

IDC_SAVE 

2 Message: BN_CLICKED 
Member functions: Object ID: IDC_LIULAN 

V DoDataExchange 

W OnClear ON_IDC_CLEAR:BN_CLICKED 

W OninitDialog ON_WM_INITDIALOG 

W Onpaint ON_WM_PAINT 

W OnQueryDraglcon ON_WM_QUERYDRAGICON Ba 


Add Class... ~ 
3 


Deyete 


Edit Code 


图 8.9 为 发 送 文件 按钮 添加 消息 响应 函数 


然后 ， 在 该 响应 函数 中 ， 使 用 “打开 ”对 话 框 打开 指定 文件 ， 并 将 其 发 送 到 相应 的 客 


户 端 ， 如 图 8.10 所 示 。 该 功能 代码 如 下 : 
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void CMYD1g::OnLiulan() 
. 


char text[100]; // 定 义 字 符 数组 
CFileDialog file(true); // 定 义 文件 对 话 框 对 象 
if (file.DoModal ()==IDOK) // 显 示 文 件 保存 对 话 框 
{ 

Cstring str; // 定 义 字 符 串 变量 
str=file.GetFileTitle(); // 获 取 文 件 名 


::send (s,str.GetBuffer (1), sizeof (str)); // 发 送 文件 名 到 服务 器 
str=file.GetPathName (); // 获 取 文 件 保存 路 径 
CFile filel (str,CFile::modeReadWrite); // 创 建文 件 对 象 


filel.Read (text, 100) // 读 取 文件 数据 
while (text!=EOF) // 判 断 文件 是 否 结束 
filel.Read (text,100); // 读 取 100 字 节 的 文件 数据 
// 发 送 文件 数据 到 服务 器 


::send(sl, &text,100); 
} 


GetDlgItem(IDC_LIULAN) ->SetWindowText ("发 送 完 成 ") ; ”// 提 示 用 户 发 送 数据 完成 


filel.Close() 


// 关 闭 文件 


} 
} 


用 户 通过 以 上 代码 实现 了 服务 器 向 客户 端 发 送 文件 数据 的 基本 功能 。 用 户 可 以 根据 实 
例 程序 的 思路 添加 或 修改 代码 ， 以 实现 自 定义 的 发 送 文 件 代码 。 


查找 范围 QD: | 固 我 IX 着 7] 和合 人 图- 


BTeneent Piles 


图 8.10 文件 打开 对 话 框 

3. 文字 通信 

在 实例 程序 中 ， 服 务 器 与 客户 端的 通信 方式 都 是 依靠 文件 进行 传输 。 因 此 ， 服 务 器 端 
还 需要 实现 文字 通信 的 相关 功能 代码 。 其 接收 代码 如 下 : 

int n=0; // 定 义 全 局 变量 

SOCKRDDR_IN add; // 套 接 字 地 址 对 象 

CString strl3; 

void CMYD1g::Onsocktl (WPARAM wParam,LPARAM lParam) 


{ 
char cs[100],csl[10000],name[15]7 
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switch (lParam) 


case FD ACCEPT: // 处 理 连接 请 求 
{ 
s1=: :accept (s, NULL, NULL); // 接 受 客户 端的 连接 请 求 
n=n+1; // 计 数 


str13.Format ("有 %d 客户 已 经 连接 上 了 ",n) ; // 格 式 化 字符 串 
this->SetWindowText (str13); 
GetD1gItem(IDC_EDIT1)->GetWindowText ( (LPTSTR)cs1,10000); 
: :getpeername (sl, (SOCKADDR*) &add, (int*) sizeof (add)); 
// 获 得 连接 对 方 的 IP 地 址 
strl3+=cs1; 
strl3+="\r\n"™; 
strl3+=::inet ntoal(add.sin addr); // 转 换 主机 字 节 的 IP 
az13+= "登录 ”7 
GetD1gItem(IDC_EDIT1)->SetWindowText (str13); 
} 


break; 
case FD READ: // 处 理 读 取 事件 
{ 
GetDlgItem(IDC SAVE)->EnableWindow (true); 
// 使 用 保存 文件 按钮 
GetD1gItem(IDC_CLERAR) ->EnableWindow (true); // 使 用 保存 文件 按钮 
sl=::accept (s, ( sockaddr *)addr2, sizeof (addr2); 
// 应 答 连接 请 求 
CString num=""; 
recv (sl,cs,100, NULL); // 接 收 数据 


GetDlgItem(IDC EDIT1) ->GetWindowText ( (LPTSTR) cs1,10000); 
//GetDlgItem(IDC EDIT2)->GetWindowText ( (LPTSTR)cs, 100); 
num+= (LPTSTR) cs17 
numt+="\r\n"; 
num+=: :inet ntoa(add.sin addr); 


// 将 IP 转换 为 主机 顺序 
numt=" 对 您 说 : "; 
num+=CS7 
GetD1gItem(IDC EDIT1) ->SetWindowText (num);} 


break; 
} 
} 


外 注意 : 由 于 在 本 书 第 6 章 中 讲解 了 关于 该 功能 的 具体 实现 方法 ， 所 以 在 本 章 中 不 再 进行 
讲解 ， 请 用 户 复习 第 6 章 中 的 相关 内 容 。 
服务 器 除了 可 以 接收 客户 端的 信息 以 外 ， 还 可 以 发 送信 息 到 客户 端 。 代 码 如 下 : 


void CMYD1g::OnSend () 


char sever[100]; // 声 明 字符 数组 变量 
GetD1gItem (IDC_EDIT2)->GetWindowText ( (LPTSTR) sever,100) 
// 获 取 要 发 送 的 数据 
CoEring SEr mm etel ue // 声 明 字符 串 变 量 
GetD1gItem (IDC_EDIT1) ->GetWindowText (str) 7 // 获 取 发 送 框 中 的 数据 
a) // 判 断 发 送 数据 是 否 为 空 
{str+="\r\n";} // 添 加 换行 符 


GetDlgItem(IDC EDIT2)->GetWindowText (str1); 
str+=strl; 
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GetD1gItem (IDC_EDIT1) ->SetWindowText (str) 7 // 设 置 程序 界面 的 显示 
send(sl, sever,100,0); // 发 送 数 据 
} 
如 果 服 务 器 与 客户 端 之 间 通 信和 的 内 容 过 多 , 会 导致 编辑 框 中 显示 的 内 容 也 过 多 。 所 以 ， 
为 了 方便 用 户 查看 消息 ， 应 该 在 程序 中 实现 清除 编辑 框 中 所 有 内 容 的 功能 。 代 码 如 下 : 


void CMYD1g: :OnClear() 
. 
GetDlgItem(IDC EDIT1)->SetWindowText (™ "); // 清 空 数据 
| 
关于 服务 器 的 所 有 功能 已 经 全 部 实现 ， 如 果 用 户 需要 为 其 添加 其 他 功能 ， 可 以 通过 修 
改 本 章 中 的 实例 代码 。 用 户 阅 读本 章 中 的 代码 时 ， 请 参考 随 书 光盘 中 相应 章节 的 代码 运行 
结果 ， 以 便 跟随 笔者 的 思路 进行 学 习 。 


8.6 ”客户 端 代码 


客户 端 向 服务 器 发 送 消息 或 者 文件 时 ， 首 先 应 该 向 服务 器 发 送 连接 请 求 并 等 待 其 应 
答 。 然 后 ， 再 将 本 地 文件 读 取 到 指定 缓冲 区 中 保存 。 最 后 ， 通 过 连接 套 接 字 发 送 到 服务 器 。 
本 节 将 向 用 户 介绍 客户 端 功 能 代码 的 编写 方法 。 


8.6.1 客户 端 功 能 


本 章 实例 程序 中 ， 客 户 端 可 以 按照 指定 的 服务 器 地 址 或 端口 连接 服务 器 。 当 客户 端 连 
接 服务 器 成 功 以 后 ， 便 可 以 向 该 服务 器 发 送 消息 、 文 件 以 及 接收 并 保存 服务 器 发 送 的 文件 
等 。 其 中 ， 发 送 文件 和 接收 保存 文件 是 客户 端的 主要 功能 。 因 此 ， 在 本 节 中 将 主要 向 用 户 
介绍 客户 端 发 送 文件 以 及 保存 文件 等 功能 的 具体 实现 方法 。 


8.6.2 创建 客户 端 


与 服务 器 端 创建 方式 一 样 ， 在 VC 中 通过 应 用 程序 向 导 创建 客户 端 界 面 。 该 界面 同样 
基于 对 话 框 模式 。 


1. 创建 工程 


在 VC 编译 器 中 ， 创 建 客户 端 对 话 框 的 步骤 如 下 : 

(1) 选择 “文件 ” |“ 新 建 ” 命 令 ， 打 开 “ 新 建 ”对 话 框 ， 并 将 工程 名 称 修 改 为 “客户 
端 ”， 如 图 8.11 所 示 。 

(2) 单 击 “ 确 定 ” 按 钮 ， 进 入 应 用 程序 类 型 设置 ， 将 该 类 型 设置 为 对 话 框 模式 ， 如 图 
8.12 所 示 。 

(3) 单 击 “ 下 一 步 ” 按 钮 ， 设 置 该 工程 应 该 包含 Windows Sockets 的 支持 ， 如 图 8.13 
所 示 。 
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文件 工程 | 工作 区 | 其 E 文 档 | 


四 ATL COM Appwizard 工程 名 称 叫 : 
园 clusterResource Type Wizard 左 F 二 
ECustom Appwizard 
伍 置 @Q: 
区 Extended Stored Proc Wizard (CADOCUMENTS AND SETTINGS 
有 创建 新 的 工作 空间 四 
了 守则 9 
F 加 
[EWin32 Application 9 
Console Application 
Win32 DynamicLink Library 
同 win3aa stotc Library 
平台 四 : 
醒 | 
了 


图 8.11 新 建 客户 端 工程 


您 的 资源 使 用 的 语言 是 : 
外 文中 国 ] [APPWZCHS.DLU 本 


您 是 否 项 望 包含 : 
F " 哄 于 "对 话 杠 
厂 上 下 文 相关 帮助 
F 30 外 观 
您 荐 望 包 含 什么 其 他 支持 ? 
三 自动 操作 凯 
厅 ActiveX 控件 [CI 
您 项 望 旬 含 WOSA 支持 吗 ? 


FwWindows Sockets MW} 
对 活 本 的 标题 是 ， 
属 F 参 


| 
人 [| 珊 


8.13 设置 工程 支持 Windows Sockets 
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(4) 单 击 “ 完 成 ”按钮 ， 完 成 客户 端 工程 的 相关 设置 ， 并 回 到 VC 主 界面 中 进行 代码 
编辑 。 


2. 设计 界面 
用 户 可 以 根据 客户 端的 基本 功能 对 其 界面 进行 设计 ， 以 适应 其 功能 的 需要 。 根 据 本 章 
中 客户 端 所 具有 的 相关 功能 ， 本 节 为 实例 程序 所 设计 的 客户 端 界 面 如 图 8.14 所 示 。 


图 8.14 客户 端 界面 
在 客户 端 界 面 中 ， 使 用 的 控件 ID 、 属 性 以 及 作用 如 表 8.11 所 示 。 
表 8.11 客户 端 控件 ID 以 及 属性 


控件 ID 控件 作用 
IDC_SAVE 保存 接收 到 的 文件 
IDC_LIULAN 发 送 文件 的 位 置 
IDC_CLEAR. 清空 信息 
IDC_EDIT1 显示 服务 器 和 客户 端 之 间 聊 天 信息 
IDC _STATIC 标识 作用 
IDC EDIT2 服务 器 将 发 送 的 消息 
IDC_SEND 发 送 消息 


用 户 从 表 8.11 中 ， 可 以 知道 在 客户 端 界面 中 ， 相 关 控件 的 ID 以 及 作用 等 信息 。 
8.6.3 界面 初始 化 


在 客户 端 界 面 中 , 部 分 控件 应 当 在 程序 需要 使 用 时 才 从 禁用 状态 转 为 可 用 状态 。 这 样 ， 
从 很 大 程度 上 避免 了 用 户 的 操作 不 当 。 同 时 ， 对 于 用 户 的 学 习 也 会 有 很 大 帮助 ， 让 用 户 明 
白 程序 的 工作 原理 。 代 码 如 下 : 

BOOL CMyD1g::OnInitDialog() 


{ 
CDialog: :OnInitDialog (); 
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RSSERT ( (IDM ABOUTBOX & 0xFFF0) == IDM ABOUTBOX); 
ASSERT (IDM ABOUTBOX < 0xF000); 
CMenu* PSYsMenu = GetSystemMenu (FALSE); 


ce // 省 略 部 分 代码 
SetIcon(m hIcon, TRUE); 
SetIcon(m hIcon, FALSE); 
GetDlgItem(IDC EDIT]1)->EnableWindow (false); // 禁 用 信息 显示 窗口 
GetDlgItem(IDC SAVE)->EnableWindow (false); // 禁 用 保存 文件 按钮 
GetD1gItem(IDC LIULAN)->EnableWindow (false); // 禁 用 发 送 文件 按钮 
GetDlgItem(IDC CLEAR)->EnableWindow (false); // 禁 用 清除 按钮 

// 省 略 部 分 代码 


return TRUE; 
} 


用 户 在 客户 端 程序 初始 化 函数 OnInitDialog0 中 ， 将 部 分 功能 按钮 禁用 。 控 件 被 禁用 后 
的 界面 ， 如 图 8.15 所 示 。 


图 8.15 界面 初始 化 


8.6.4 连接 服务 器 


客户 端 可 以 通过 设置 服务 器 的 他 地 址 和 端口 连接 相应 的 服务 器 。 

1. 添加 对 话 框 

在 客户 端 初始 化 时 ， 只 有 连接 服务 器 按钮 处 于 可 用 状态 。 用 户 单 击 该 按钮 会 弹出 如 网 
8.16 所 示 的 服务 器 设置 对 话 框 。 通 过 该 对 话 框 可 以 为 客户 端 设置 服务 器 的 卫 地 址 以 及 连接 
端口 。 

2. 使 用 对 话 框 

如 果 用 户 在 程序 中 需要 使 用 到 这 个 对 话 框 ， 则 必须 通过 应 用 程序 向 导 为 该 对 话 框 附加 
一 个 类 ， 并 指定 该 类 名 为 CSSet， 如 图 8.17 所 示 。 
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Class information 二 [ES 
Name: CSsget | 
Cancel 
File name: SSetl.cpp 
Change... 
Base class: CDialog - 
Dialog ID: IDD_DIALOG2 -| 
ne Automation 
， ”地址 ，。 ”交加 | F None 
端口 捕 辑 Cautomation 
| fF Createable by type ID: 
| 确定 重 填 
| as 
图 8.16 服务 器 设置 对 话 框 图 8.17 添加 新 类 


打开 CSSet 类 的 头 文件 SSeth， 在 该 类 的 声明 中 定义 两 个 变量 ， 分 别 表示 服务 器 地 址 
与 端口 。 代 码 如 下 : 


class CSSet : public CDialog 
上 
public: 


CSSet (CWnd* pParent = NULL); 
CString m add; // 服 务 器 地 址 
int m port; // 服 务 器 端口 号 


SE // 省 略 部 分 代码 
} 
现在 ， 客 户 端 程序 便 可 以 使 用 对 话 框 类 CSSet。 首 先 ， 应 该 在 头 文件 “客户 端 Dlg.h” 
中 包含 新 对 话 框 类 的 头 文件 SSet.h。 然后, 在 主 对 话 框 类 的 声明 中 定义 一 个 CSSet 类 对 象 。 
代码 如 下 : 
#include "SSet.h" // 包 含 新 对 话 框 类 的 头 文件 


class CMVYD1g : public CDialog 
{ 


public: 
CMyD1lg (CWnd* PParent = NULL); 
CSSet set; // 定 义 对 象 
SOCKET s; // 定 义 套 接 字 对 象 
sockaddr in addr; // 定 义 网 络 地 址 结构 对 象 


Se // 省 略 部 分 代码 

} 

在 客户 端 实例 界面 中 ， 为 连接 服务 器 按钮 添加 消息 响应 函数 OnConnect0， 如 图 8.18 

所 示 。 

在 连接 服务 器 按钮 的 消息 响应 函数 OnConnect0 中 , 需要 显示 CSSet 类 对 话 框 , 并 且 从 
该 对 话 框 中 获取 服务 器 的 他 地址 以 及 端口 。 代 码 如 下 : 


void CMyD1g: :OnConnect () 
i 
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Add Wenber Function 


Member function name: 
Conncc!] 


Cancel 


Message: BN_CLICKED 
Object ID: IDC_CONNECT 


图 8.18 ”添加 响应 函数 


DWORD ss=MAKEWORD (2,0); // 初 始 化 套 接 字 库 
::WSAStartup(ss, &data); 
ifl(set .DoModal ()==IDOK) 
{ 
addr.sin family=AF INET; // 为 地 址 结构 中 的 成 员 赋值 

adqdr .sin port=htons (set.m port); // 设 置 服务 器 端口 

addr.sin addr.s un.s addr=inet addr (set.m add); // 转 换 服务 器 IP 地 址 

s=: :socket (AF_INET, SOCK_STREAM, IPPROTO_TCP); // 创 建 套 接 字 

: WSAAsyncSelect(s, this->m hWnd,WM CSOCKT,FD READ); 
// 设 置 异步 套 接 字 
if(::connect(s，(sockaddr *)addr，sizeof (addr)) !=-1)  // 连 接 服 务 器 
{ // 如 果 连 接 服务 器 成 功 
This->SetWindowText ("连接 成 功 ! "); 
GetDlgItem(IDC LIULAN)->EnableWindow (true); // 界 面 中 主要 控件 处 于 可 用 状态 
GetDlgItem(IDC SRAVE) ->EnableWindow (true); 
GetDlgItem(IDC CLEAR)->EnableWindow (true); 
} 
else // 如 果 连 接 服务 器 失败 
{ 
This->SetWindowText ("连接 失败 ， 请 重 试 ! ") ; 
GetDlgItem(IDC_LIULAN) ->EnableWindow (false);  ”// 禁 用 程序 主要 按钮 控件 
GetDlgItem(IDC SAVE)->EnableWindow (false); 
GetDlgItem(IDC CLEAR)->EnableWindow (false); 
} 
} 

} 


在 代码 中 , 程序 调用 API 函数 WSAAsyncSelect0 将 客户 端的 连接 套 接 字 设置 为 异步 模 
式 。 当 有 相关 的 套 接 字 事件 发 生 时 ， 程 序 便 会 向 窗口 发 送 自 定义 消息 WM_CSOCKT。 消 
息 WM_CSOCKT 是 在 工程 头 文件 中 定义 的 自 定义 消息 。 代 码 如 下 : 

#if MSC VER > 1000 

#pragma once 


#endif // MSC VER > 1000 
#define WM CSOCKT WM USER+11 // 定 义 自 定义 消息 
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class CMVYD1g : public CDialog 
{ 
// 省 略 部 分 代码 


用 户 在 头 文件 中 ， 除 了 定义 自 定义 消息 以 外 ， 还 需要 定义 消息 响应 函数 。 代 码 如 下 : 


class CMVY2D1g : public CDialog 
{ 


public: 
3 // 省 略 部 分 自动 生成 的 代码 

CString ip; 

SOCKET s7 // 服 务 器 监听 套 接 字 
int port; // 服 务 器 端口 号 
CEile file; // 文 件 对 象 
char buff[100]; // 自 定义 缓冲 区 
CString str; // 字 符 串 变量 
HWND h; // 窗 口 实例 句柄 
public: 

SOCKET s; // 连 接 套 接 字 句柄 
sockaddr in addr; // 套 接 字 地 址 信息 
WSADATA data; // 套 接 字 版 本 
int // 循 环 变量 
int n; 
afx msg void Oncsockt] (WPARAM wParam,LPARAM lParam); 
// 套 接 字 消息 响应 函数 
afx msg void OnTimer (UINT nIDEvent); 
afx msg void OnClose(); 
// 省 略 部 分 代码 


然后 ， 用 户 还 需要 在 消息 映射 宏 中 添加 套 接 字 消 息 的 消息 映射 项 ， 以 便 将 套 接 字 消 息 
与 其 消息 响应 函数 相关 联 。 代 码 如 下 : 


本 // 省 略 部 分 代码 

BEGIN MESSAGE MRP(CMYD1g，CDialog) // 消 息 映射 开始 

//{{AFX_MSG MAP (CMyD1g) 

ON WM SYSCOMMAND() 

ON_WM_PAINT () 

ON WM QUERYDRAGICON () 

ON_MESSAGEMAP (WM_CSOCKT, Oncsockt1) // 套 接 字 消 息 映射 项 
ON_BN_CLICKED (IDC CONNECT, OnConnect) // 连 接 按钮 的 消息 映射 项 
ON_BN_CLICKED(IDC CLEAR, OnClear) // 清 除 按钮 的 消息 映射 项 
ON_BN_CLICKED(IDC LIULAN, OnLiulan) // 发 送 文件 按钮 的 消息 映射 项 
ON_BN_CLICKED (IDC SAVE, OnSsave) // 接 收文 件 按钮 的 消息 映射 项 
ON_BN_CLICKED(IDC SEND, Onsend) // 发 送 消息 按钮 的 消息 映射 项 
//}}AFX MSG MRP 

END MESSAGE MRP () // 结 束 消息 映射 

SR // 省 略 部 分 代码 


用 户 在 文件 “客户 端 Dlg.cpp” 中 添加 上 述 代码 以 后 ， 便 为 自 定义 套 接 字 消息 WM_ 
CSOCKT 添加 了 相应 的 消息 响应 函数 。 下 面 ， 将 向 用 户 介绍 客户 端 收发 消息 以 及 接收 发 送 
文件 的 功能 实现 ， 其 中 ， 接 收文 件 功能 就 是 在 套 接 字 消 息 响应 函数 中 实现 。 
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8.6.5 代码 分 析 


在 客户 端 中 ， 其 代码 模块 主要 分 为 收发 消息 、 接 收文 件 以 及 发 送 文件 等 。 本 节 将 根据 
顺序 向 用 户 分 别 讲解 各 个 模块 的 代码 实现 。 

1. 收发 消息 

为 了 在 客户 端 中 实现 与 服务 器 进行 文字 交流 ， 用 户 必须 为 客户 端 实现 收发 文字 消息 的 
功能 。 首 先 ， 为 发 送 按钮 添加 相应 的 消息 响应 函数 OnSend0。 然 后 ， 在 该 函数 中 添加 代码 
以 实现 消息 的 收发 功能 。 代 码 如 下 : 


void CMYD1g: :OnSend () 


char sever[100]; // 声 明 字符 数组 变量 
GetD1gItem(IDC_EDIT2) ->GetWindowText ( (LPTSTR) sever,100); 

// 获 取 要 发 送 的 数据 
SHEring ste me Sr // 声 明 字符 串 变 量 
GetDlgItem(IDC EDIT1)->GetWindowText (str); // 获 取 发 送 框 中 的 数据 
El(s Eel) // 判 断 发 送 数据 是 否 为 空 


人 
} // 添 加 换行 符 
GetDlgItem(IDC EDIT2)->GetWindowText (str1); 
str+=strl; 
GetDlgItem(IDC_EDIT1) ->SetWindowText (str); // 设 置 程序 界面 的 显示 
send(sl, sever, 100,0); // 发 送 数 据 


在 VC 中 编译 运行 上 面 的 程序 ， 当 客户 端 连接 服务 器 成 功 以 后 ， 用 户 便 可 以 发 送 文字 
消息 到 服务 器 器 且 将 这 些 文件 显示 在 客户 端 界面 上 ， 如 图 8.19 所 示 。 


EE 


消 息 : [ 2 | 
图 8.19 发送 消 息 到 服务 器 


2. 接收 文件 
客户 端 与 服务 器 一 样 ， 具 有 接收 文件 的 功能 。 当 客户 端 检测 到 服务 器 发 送 的 文件 时 ， 
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将 接收 文件 按钮 设置 为 可 用 状态 ,这 时 用 户 可 以 通过 单 击 该 按钮 选择 接收 文件 的 保存 路 径 。 
当 保 存 路 径 选 择 后 ， 客 户 端 开始 接收 文件 数据 。 代 码 如 下 : 


void CMYD1g: :Oncsocktl (WPARAM wParam, LPARAM lParam) 
{ 
switch (lParam) 


{ 


case FD READ: // 设 置 读 取 事件 

本 // 省 略 部 分 代码 

GetDlgItem(IDC SAVE)->EnableWindow (true) 7 // 使 用 保存 文件 按钮 

GetDlgItem (IDC CLEAR) ->EnableWindow (true); // 使 用 保存 文件 按钮 
ae // 省 略 部 分 代码 


1 
} 


然后 ， 用 户 需要 为 接收 文件 按钮 添加 消息 响应 函数 OnSave0， 如 图 8.20 所 示 。 


Member function name: 
< Cancel 


Message: BN_CLICKED 
Object ID: IDC_SAVE 


消息 : 隔 本 _ | 


图 8.20 添加 消息 响应 函数 


在 消息 响应 函数 OnSave0 中 ， 使 用 文件 对 话 框 CFileDialog 类 显示 文件 保存 对 话 框 ， 
实现 真正 意义 上 的 文件 接收 功能 。 代 码 如 下 : 


void CMYD1g::OnSave() // 接 收文 件 按钮 的 消息 响应 函数 
{ 
if (s!=NULL) 
{ 
::recv(s, gtext, 100); // 接 收文 件 名 
if (text!=0) 
{ 

CFileDialog filedlg (false); // 定 义 文件 对 话 框 对 象 
filedlg.m ofn.lpstrFileTitle= (LPSTR) text; // 在 对 话 框 中 显示 接收 到 的 文件 名 
if (filedlg.DoModal ()==IDOK) // 显 示 文件 保存 对 话 框 
{ 

Cotring ste // 定 义 字符 串 变量 
str=filedlg.GetPathName (); // 获 取 文 件 保存 路 径 
str+=(LPSTR) text; // 连 接 文 件 路 径 和 文件 名 
CFile filel(str, CFile::modeReadWrite); // 根 据 文件 名 创建 文件 
if (file!=NULL) // 判 断 文件 是 否 创 建成 功 
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while (text!=0) // 循 环 接收 数据 
{ 
::recv(s, &text,100); / /接收 数据 
file.Write (gtext,100); // 写 入 文件 
} 
file.close(); // 关 闭 文件 或 套 接 字句 柄 


GetDlgItem(IDC_SAVE) ->SetWindowText (" 接 收 完成 ") ; // 提 示 用 户 接收 数据 完成 
} 
让 

} 

F 

} 

用 户 通过 文件 保存 对 话 框 选择 接收 文件 的 保存 路 径 ， 然 后 在 该 路 径 上 创建 与 接收 文件 
名 称 相同 的 空 文件 。 空 文件 创建 成 功 以 后 ， 客 户 端 便 开始 接收 文件 数据 ， 并 将 这 些 数据 保 
存 到 刚 创 建 的 文件 中 ， 直 到 文件 数据 接收 完毕 。 用 户 可 以 参考 随 书 光盘 中 的 实例 代码 。 


3. 发 送 文件 
客户 端 向 服务 器 发 送 文件 是 通过 发 送 文件 按钮 实现 的 。 当 用 户 单 击 该 按钮 后 ， 程 序 应 
该 弹出 “打开 ”对 话 框 供用 户 选择 将 要 发 送 的 文件 以 及 其 路 径 。 然 后 ， 程 序 根据 文件 路 径 


创建 文件 对 象 并 打开 该 文件 进行 读 取 ， 直 到 读 取 全 部 数据 成 功 。 最 后 ， 将 缓冲 区 中 的 数据 
发 送 到 服务 器 即 可 。 代 码 如 下 : 


void CMyD1g: :OnLiulan() // 发 送 文件 按钮 的 消息 响应 函数 
char text[100]; // 定 义 字符 数组 
CFileDialog file(true); // 定 义 文件 对 话 框 对 象 

if (file.DoModal ()==IDOK) // 显 示 文 件 保存 对 话 框 

{ 

Cstring str; // 定 义 字符 串 变量 
str=file.GetFileTitle(); // 获 取 文 件 名 


::send (s,str.GetBuffer (1) ,sizeof (str)); // 发 送 文 件 名 到 服务 器 
str=file.GetPathName (); // 获 取 文件 保存 路 径 
CFile filel(str,CFile::modeReadWrite); ”// 创 建文 件 对 象 


filel.Read (text, 100) // 读 取 文 件数 据 
while (text !=EOF) // 判 断 文件 是 否 结束 
filel.Read (text,100) // 读 取 100 字 节 的 文件 数据 
// 发 送 文件 数据 到 服务 器 


::send(s, gtext, 100); 
. 


GetDlgItem(IDC_LIULAN) ->SetWindowText ("发 送 完成 ") ; ”// 提 示 用 户 发 送 数 据 完成 


filel.Close() 


} 


// 关 闭 文件 


当 用 户 创建 CFileDialog 类 对 象 时 ， 如 果 将 构造 函数 的 参数 设置 为 tue， 则 程序 将 显示 
文件 打开 对 话 框 ， 如 图 8.21 所 示 。 用 户 在 该 对 话 框 中 选择 将 发 送 的 文件 ， 然 后 程序 创建 与 
该 文件 相关 联 的 文件 对 象 。 程 序 利 用 该 文件 对 象 读 取 文 件数 据 到 缓冲 区 中 保存 。 最 后 ， 将 
缓冲 区 中 的 内 容 通过 套 接 字 发 送 到 服务 器 完成 客户 端的 发 送 功能 。 
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8.7 小 结 


在 本 章 中 ， 主 要 向 用 户 介绍 了 网 络 文件 传输 器 的 基本 原理 ， 结 合 实例 程序 分 别 介绍 了 
传输 器 的 服务 器 与 客户 端 。 在 服务 器 和 客户 端的 功能 实现 中 ， 主 要 讲述 了 服务 器 的 基本 功 
能 ， 并 在 VC 开发 环境 下 ， 通 过 编写 其 功能 代码 向 用 户 讲解 服务 器 端的 功能 实现 。 

通过 本 章 对 网 络 文件 传输 器 相关 知识 的 学 习 ， 用 户 应 该 能 基本 掌握 网 络 文件 传输 器 的 
工作 原理 ， 并 且 根 据 该 原理 实现 服务 器 与 客户 端 之 间 的 网 络 连接 以 及 文件 收发 等 。 其 中 ， 
网 络 连 接 与 文件 收发 部 分 均 是 通过 Windows 套 接 字 实 现 的 , 而 文件 保存 以 及 打开 操作 是 依 
靠 文件 对 话 框 类 CFileDialog 实现 的 。 所 以 , 用 户 应 该 将 随 书 光盘 中 的 实例 代码 与 程序 运行 
结果 相 比 较 学 习 ， 这 样 会 使 用 户 的 理解 更 深刻 。 
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在 实际 生活 中 ， 用 户 所 使 用 的 播放 器 会 有 很 多 种 ， 包 括 专门 播放 音乐 和 视频 等 数据 格 
式 的 播放 器 。 在 本 章 中 ， 将 向 用 户 举例 介绍 MP3 的 文件 格式 等 基础 知识 ， 并 且 在 VC 中 编 
写 一 种 能 够 播放 MP3 音乐 的 播放 器 。 


9.1 播放 器 编程 基础 


由 于 各 种 音频 、 视 频 信息 都 是 以 不 同 的 数据 格式 进行 存储 的 。 因 此 ， 用 户 对 这 些 固定 
数据 格式 的 音频 、 视 频 文件 进行 解码 时 ， 需 要 使 用 播放 器 。 例 如 ， 用 户 播放 MP3 格式 的 音 
乐 文件 时 ,播放 器 将 数字 信号 转换 成 音频 信号 后 送 入 音频 设备 中 进行 播放 。 在 这 个 过 程 中 ， 
播放 器 起 着 解码 的 作用 。 一 般 情 况 下 ， 播 放 器 可 以 分 为 音乐 播放 器 和 视频 播放 器 等 种 类 。 
在 本 章 中 ， 将 以 MP3 音乐 文件 为 例 ， 主 要 向 用 户 讲解 音乐 播放 器 程序 的 实现 方法 。 


9.1.1 MP3 介绍 


MP3 格式 是 一 种 音频 压缩 格式 。 使 用 这 种 格式 进行 压缩 的 数据 容量 较 小 。 一 般 情况 下 ， 
MP3 格式 是 按照 1 ; 12 的 倍率 对 数据 进行 压缩 ,因此 ,MP3 格式 的 数据 采用 的 是 有 损 压 缩 ， 
将 大 容量 的 音频 数据 丢弃 部 分 数据 后 重新 进行 组 合 。 在 这 种 情况 下 ， 音 乐 数据 的 少量 丢失 
并 不 会 影响 MP3 音乐 的 播放 质量 。 


9.1.2 播放 MP3 文件 


在 本 章 中 ,主要 向 用 户 讲解 在 VC 中 编程 实现 播放 MP3 音乐 的 功能 。 首 先 ， 用户 需 要 
使 用 API 函数 或 者 MFC 类 读 取 该 格式 文件 ， 获 取 相 应 的 文件 信息 。 然 后 ， 用 户 可 以 使 用 
相关 的 函数 播放 MP3 音乐 。 


1. 读 取 MP3 音 乐 文件 


与 一 般 文件 一 样 ，MP3 音乐 文件 拥有 固定 的 数据 结构 。 所 以 ， 当 用 户 读 取 MP3 音乐 
文件 时 ， 可 以 将 该 文件 当 作 一 般 的 文件 进行 读 取 。MP3 数据 结构 是 由 两 部 分 构成 : 数据 帧 
和 标签 帧 。 其 中 ， 数 据 帧 包含 了 该 音乐 的 实体 数据 。 而 标签 帧 中 是 以 字符 TAG 为 标记 ， 
长 度 为 MP3 文件 的 最 后 128 字 节 。 在 标签 帧 中 包含 了 该 音乐 的 演唱 者 、 音 乐 名 称 以 及 时 间 
等 信息 。 用 户 知道 这 些 知识 以 后 , 便 可 以 在 编程 时 自 定义 一 个 数据 结构 获取 MP3 音乐 文件 
的 相关 信息 。 
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外 注意 : 由 于 本 章 实 例 中 主要 是 使 用 API 函数 播放 MP3 音乐 ， 所 以 关于 数据 帧 的 讲解 将 
省 略 。 主 要 向 用 户 讲解 MP3 文件 的 标签 帧 。 


例如 ， 在 本 实例 中 ， 用 户 可 以 自 定 义 结构 体 获 取 MP3 文件 信息 。 结 构 定 义 如 下 : 


typdef struct mp3 struct // 自 定义 MP3 结构 体 
char heade[3]; //TAG 字符 标记 
char title[30]; // 音 乐 文件 名 称 
char arti [30]; // 演 唱 者 
char alb [30]; // 专 辑 
char year[4]; // 出 版 年 份 
char text[28]; // 备 注 内 容 

// 省 略 部 分 成 员 


} mp3struct; 


在 该 自 定义 结构 中 , 列 出 了 一 些 关 于 MP3 音乐 文件 的 信息 结构 成 员 并 省 略 了 3 个 不 常 
用 的 字 节 。 用 户 可 以 根据 该 结构 体 编程 读 取 文件 相关 人 信息。 首先， 用 户 使 用 MFC 文件 类 
CFile 读 取 文件 , 再 将 文件 指针 移动 到 该 文件 最 后 。 然 后 从 文件 最 后 向 前 读 取 128 个 字 节 即 
可 获取 到 MP3 文件 的 相关 信息 。 代 码 如 下 : 


es // 省 略 部 分 代码 
mp3struct mp3={0}; // 定 义 并 初始 化 字符 数组 
CFile file("C:\\ 卡 门 .mp3",CFile: :modeReadWritel|lCFile::typeBinary); 
// 创 建文 件 对 象 
file.Seek(-128,CFile::end); // 从 文件 结尾 处 移动 文件 
// 指 针 
file.Read (gmp3, 128); // 从 文件 中 读 取 128 个 字 节 
MessageBox (mp3.arti); // 显 示 歌曲 的 演唱 者 
es // 省 略 部 分 代码 


在 代码 中 ,用 户 首先 创建 与 MP3 文件 相关 联 的 文件 对 象 flle， 
并 且 指定 以 二 进 制 方式 打开 该 文件 。 将 上 面 的 代码 编译 运行 之 
后 ， 程 序 会 弹出 对 话 框 并 在 该 对 话 框 上 显示 该 歌曲 的 演唱 者 ， 如 
图 9.1 所 示 。 

和 注意: 在 CFile 类 的 函数 Seek0 中 是 将 第 一 个 参数 设置 为 于 “图 91 显示 歌曲 的 演唱 者 


一 128, 表示 文件 指针 是 从 文件 结尾 处 向 前 移动 128。 如 果 用 户 将 该 参数 设置 为 正 ， 
则 函数 将 返回 错误 。 


如 果 用 户 需要 显示 其 他 MP3 文件 信息 ， 则 仅 需 将 结构 体 mp3struct 中 的 各 个 成 员 变量 
值 显示 出 来 即 可 。 例 如 ， 显 示 MP3 文件 的 所 有 相关 信息 。 代 码 如 下 : 


// 省 略 部 分 代码 
CString str=" "; // 定 义 并 初始 化 字符 串 
str+=mp3.title; // 显 示 音乐 标题 
stri="\r\n"; // 添 加 换行 符 
Str+=mp3.arti7 // 显 示 音乐 演唱 者 
str+="\r\n"; 

str+=mp3.alb; // 显 示 音乐 的 专辑 信息 


str+="\r\n"; 
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str+=mp3.year; // 显 示 音乐 的 出 版 年 份 
stri="\r\n"s 


MessageBox (str); // 显 示 音乐 文件 相关 信息 
Se // 省 略 部 分 代码 


用 户 将 上 面 的 代码 进行 编译 、 运 行 之 后 ， 程 序 弹出 对 
话 框 并 将 显示 该 MP3 文件 的 所 有 信息 ， 如 图 9.2 所 示 。 


全 注意 : 用 户 在 实际 编程 中 ， 可 以 使 用 本 节 所 定义 的 MP3 
结构 获取 文件 的 相关 信息 。 图 9.2 显示 MP3 文件 的 所 有 信息 


2. 调用 函数 播放 MP3 音 乐 


在 上 述 内 容 中 ， 用 户 学 习 了 MP3 的 数据 结构 知识 ， 通 过 该 数据 结构 可 以 获取 MP3 的 
附加 信息 。 在 本 小 节 中 ， 将 向 用 户 介绍 在 Windows 系统 中 调用 API 函数 播放 MP3 歌曲 的 
函数 使 用 方法 。 

用 户 在 VC 中 播放 MP3 音乐 可 以 调用 API 函数 mciSendCommand0 和 mciSendString0 
实现 。 由 于 在 本 章 中 将 主要 使 用 函数 mciSendCommand0 进 行 实例 编程 ， 所 以 函数 
mciSendString0 将 不 在 本 章 的 讲解 范围 内 ， 请 用 户 参 考 MSDN。 函 数 mciSendCommandO 
的 原型 如 下 : 

MCIERROR mciSendCommand( 

MCIDEVICEID IDDevice, 
UINT uMsg, 

DWORD fdwCommand, 
DWORD dwParam 

); 

该 函数 的 作用 是 发 送 指定 功能 的 命令 消息 到 指定 设备 执行 。 其 功能 十 分 强大 ， 不 仅 可 
以 实现 播放 MP3 的 功能 ， 还 可 以 播放 其 他 格式 的 音 视 频数 据 或 操作 一 些 硬件 设备 。 例 如 ， 
光驱 等 。 该 函数 如 果 调 用 成 功 ， 则 返回 0。 和 否则 ， 函 数 将 返回 相关 错误 信息 。 函 数 具 有 4 
个 参数 ， 意 义 分 别 如 下 : 

口 参数 IDDevice 表示 MCI 设备 人 D。 


很 注 意 : 用 户 在 首次 打开 该 设备 时 ， 使 用 系统 默认 的 多 媒体 设备 ， 则 可 以 直接 设置 为 0。 
否则 ，MCI 可 用 的 设备 如 表 9.1 所 示 。 


表 9.1 MCI 可 用 设备 取 值 


MCI 可 用 设备 取 值 意 义 

MCI_ DEVTYPE ANIMATION 动画 播放 设备 

MCI DEVTYPE CD AUDIO CD 音频 播放 设备 

MCI DEVTYPE DAT 数字 音频 设备 

MCI DEVTYPE WAVEFORM AUDIO 波形 音频 设备 

MCI ALL DEVICE ID 包括 系统 中 所 有 的 MCI 设 备 
MCI DEVTYPE DIGITAL VIDEO 数字 视频 设备 

MCI DEVTYPE OTHER 未 定义 的 设备 


ws 
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当 用 户 播放 MP3 等 常用 格式 的 音频 文件 时 ， 需 要 将 该 参数 值 设 置 为 0 或 者 是 
MCI DEVTYPE_WAVEFORM_AUDIO 即 可 。 
口 参数 uMsg 表示 发 送 到 设备 的 命令 消息 。 其 取 值 如 表 9.2 所 示 。 


表 9.2 设备 命令 消息 


命令 消息 
MCI CLOSE 
MCI PAUSE 
MCI RESUME 


命令 消息 
MCI OPEN 
MCI PLAY 
MCI STOP 


全 注意 : 在 表 9.2 中 列 出 的 设备 命令 消息 都 是 用 户 常用 的 一 些 设备 命令 消息 ， 如 果 用 户 需 
要 了 解 更 多 关于 MCI 的 设备 命令 消息 请 参考 MSDN， 在 本 书 中 不 再 对 其 进行 
口 参数 fdwCommand 表示 命令 消息 的 标志 位 。 其 取 值 如 表 9.3 所 示 。 
表 9.3 命令 消息 标志 位 取 值 


关闭 命令 


取 值 意义 
当 用 户 执行 MCI 打 开 命 令 MCI_ OPEN 时， 必须 指定 该 标志 位 。 如 果 
MCI_ OPEN_ELEMENT 用 户 指定 该 标志 位 ,那么 命令 参数 结构 必须 为 MCI_OPEN_PARMS， 


用 户 可 以 在 此 结构 中 指定 播放 文件 的 设备 类 型 以 及 文件 名 等 

当 用 户 执行 命令 MCI PLAY 时 ， 必 须 指定 该 标志 位 ， 表 示 从 文件 起 
始 位 置 播放 文件 。 其 命令 参数 结构 为 MCI PLAY PARMS 

MCI SEEK TO_START 当 用 户 执行 命令 MCI_ START 时， 必须 指 定 该 标志 位 

当 用 户 执行 命令 MCI_ SEEK 时， 必须 指定 该 标志 位 。 其 命令 参数 结 
构 为 MCIL SEEK PARMS 

表示 打开 光驱 。 当 用 户 执行 命令 MCI SET 时 ， 必 须 指定 该 命令 消息 
标志 位 ， 其 命令 参数 结构 为 NULL 

表示 关闭 光驱 。 当 用 户 执行 命令 MCI SET 时 ， 关 闭 光 驱 操 作 所 要 指 
定 的 命令 消息 标志 位 。 其 命令 参数 结构 为 NULL 


MCI FROM 


MCI TO 
MCI_SET_DOOR_OPEN 


MCI_ SET_DOOR CLOSED 


全 注意 : 在 表 9.3 中 列举 了 部 分 常用 MCI 命 令 消息 标志 位 。 如果 用 户 需要 了 解 其 他 命令 消 
息 的 标志 位 可 以 参考 MSDN， 本 章 不 再 资 述 。 


口 参数 dwParam 表示 MCI 命令 参数 结构 的 地 址 。 一 般 情况 下 ,用 户 可 以 在 该 参数 所 
指向 的 结构 中 设置 MCI 操作 的 相关 信息 。 例 如 ， 在 表 9.3 中 所 提 到 的 命令 参数 结 
构 体 MCI OPEN _PARMS 和 MCI PLAY _PARMS 是 用 户 在 实际 编程 中 会 经 常 使 用 
到 的 命令 参数 结构 体 。 常 用 结构 体 定 义 如 下 : 


typedef struct { // 结 构 体 MCI_OPEN_PARMS 定义 
DWORD dwCallback; // 回 调 函数 地 址 
MCIDEVICEID wDeviceID; // 设 备 ID 
LPCSTR lpstrDeviceType; // 设 备 类 型 
LPCSTR lpstrElementName; // 文 件 名 


LPCSTR lpstrAlias; 
} MCI_OPEN PARMS; 
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typedef struct { // 结 构 体 MCI_PLAY PARMS 定义 
DWORD dwCallback; // 回 调 函 数 地 址 
DWORD dwFrom; // 播 放 开始 位 置 
DWORD dwTo; / /播放 结束 位 置 


} MCI_ PLAY PARMS; 


例如 ， 用 户 使 用 结构 体 MCI_OPEN_PARMS 打开 或 关闭 光驱 。 代 码 如 下 : 


本 // 省 略 部 分 代码 
MCIDEVICEID mci; //MCI 设备 ID 对 象 
MCI_OPEN PRRMS open; // 结 构 体 变量 
open .1pstrDeviceType = "CDAUDIO"; // 指 定 设备 类 型 为 CD-ROM 
mciSendCommand (NULL,MCI_OPEN, MCI_WRIT1MCI_OPEN TYPE, (DWORD)// open) ; 

// 初 始 化 设备 
mci=mciGetDeviceID( open.lpstrDeviceType ) 7 // 获 取 该 设备 的 ID 
mciSendCommand (mci,MCI SET,MCI WAITIMCI SET DOOR OPEN,NULL); 

// 打 开光 驱 门 
本 // 省 略 部 分 代码 
mciSendCommand (mci, MCI SET,MCI WAITIMCI SET DOOR CLOSED,NULL); 

// 关 闭 光驱 门 


在 上 面 的 代码 中 ， 用 户 首先 应 该 初始 化 CD 设备 ， 然 后 再 打开 或 关闭 设备 。 用 户 可 以 
在 随 书 光盘 中 运行 该 实例 程序 看 看 效果 。 
用 户 也 可 以 使 用 这 两 个 结构 体 打开 MP3 文件 并 播放 。 代 码 如 下 : 


Se // 省 略 部 分 代码 
MCI_OPEN_PARMS open; // 定 义 结构 体 变量 
open.1pstrElementName="C:\N\oo.mp3"7 // 指 定 MP3 文件 路 径 
open.lpstrDeviceType="mpegaudio"; // 指 定 播放 设备 类 型 
UINT err; // 定 义 错误 变量 
err=mciSendCommand (NULL,MCI OPEN,MCI OPEN TYPE1MCI OPEN ELEMENT, (DWO 
RD) &open); // 初 始 化 设备 
if(err==0) // 设 备 初始 化 成 功 
{ 

MCI_PLAY PARMS play; // 定 义 结构 体 变量 
play.dwFrom=0; // 指 定 文件 的 播放 位 置 

mciSendCommand (open .wDeviceID,MCI PLAY,0, (DWORD) gplay); 

// 播 放 MP3 文件 
} 
else // 初 始 化 设备 失败 
{ 
char str[100]; // 定 义 并 初始 化 字符 数组 
mciGetErrorstring (err, (LPSTR) str, 100); // 获 取 初 始 化 设备 时 的 错误 信息 
MessageBox (str); // 错 误 提 示 


县 注意 : 如 果 函 数 mciSendCommand0 执 行 失败 ， 则 会 返回 错误 信息 。 用 户 可 以 调用 函数 
mciGetErrorString0 获 取 错 误 信息 。 如 果 用 户 使 用 上 面 的 代码 初始 化 音频 设备 失败 
或 者 播放 MP3 音乐 无 声音 ， 则 用 户 应 该 重新 安装 或 更 新 声卡 驱动 程序 。 
在 本 小 节 中 ， 主 要 向 用 户 介 绍 了 在 Windows 系统 下 MP3 文件 的 基本 格式 和 使 用 函数 
播放 MP3 文件 的 基本 方法 。 请 用 户 将 随 书 光盘 中 的 实例 代码 结合 本 书 理论 知识 一 起 学 习 ， 
这 样 将 更 有 效率 。 
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92 界面 设计 


对 于 音乐 播放 器 而 言 ， 界 面 中 各 个 控件 的 位 置 以 及 大 小 是 否 合理 决定 了 播放 器 设计 是 
否 成 功 ， 所 以 界面 设计 是 非常 重要 的 一 关 。 在 本 章 中 ， 将 在 VC 开发 环境 中 进行 界面 的 设 
计 以 及 代码 编写 工作 。 用 户 设计 播放 器 ， 应 当 首 先 创建 其 窗口 。 本 节 将 向 用 户 介绍 在 VC 
开发 环境 下 ， 创 建 播放 器 工程 以 及 播放 器 界面 窗口 。 


9.2.1 创建 工程 


用 户 需要 在 VC 中 新 建 一 个 工程 ， 并 将 其 工程 命名 为 “实用 播放 器 ”。 有 具体 创建 步骤 
如 下 图 所 示 : 
(1) 选择 “文件 ”|“ 新 建 ” 命 令 ， 打 开 “ 新 建 ” 对 话 框 ， 如 图 9.3 所 示 。 


文件 工程 | 工作 区 | 其 它 文档 | 


[加 ATL COM AppWizard 工程 名 称 电 : 
ee Resource Type Wizard 医用 播放 圳 


Custom AppWizard 


Database Project 站 
| 不 DevStudio Add-in Wizard 位 置 (Oj: 


es Stored Proc Wizard CADOCUMENTS AND SETTINGS :| 


1SAPI Extension Wizard 
Makefile 
MFC ActiveX ControlWizard 


强 MFC AppWizard [dl 人 创建 新 的 工作 空间 四 
有 AppWizard [exej 人 添加 到 当前 工作 空间 办 
New Database Wizard F 从 属于 [D) 
Tf Utility Project ie ; 

Win32 Application 
Ess Console Application 
[Win32 DynamicLink Library 


%] Win32 Static Library 


9.3 “新 建 ” 对 话 框 


用 户 在 该 对 话 框 中 ， 选 择 新 建 基于 MF 应 用 程序 向 导 的 工程 ， 并 且 可 以 修改 工程 名 称 
以 及 工程 的 保存 路 径 。 

(2) 单 击 “ 确 定 ” 按 钮 ， 进 入 下 一 步 修改 应 用 程序 的 类 型 ， 如 图 9.4 所 示 。 

由 于 该 应 用 程序 是 基于 对 话 框 模式 ， 所 以 用 户 在 选择 应 用 程序 类 型 时 ， 应 该 选择 “ 基 
本 对 话 框 ” 单 选 按钮 。 
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了 IFC 应 用 程序 向 导 - 步 村 1 


您 的 资源 使 用 的 语言 是 : 
中 文 [中 国 ] APPWZCHS.DLU 加 


本 完成 取消 


图 9.4 选择 应 用 程序 类 型 
(3) 单 击 “ 下 一 步 ”按钮 ， 进 入 设置 步骤 的 第 二 步 。 由 于 该 实例 播放 器 不 应 该 含有 
关于 播放 器 对 话 框 的 任何 信息 。 所 以 ， 在 这 里 应 该 取消 选中 “" 关 于 "对 话 框 ” 复 选 框 ， 如 
图 9.5 所 示 。 


了 FC 应 用 程序 向 导 - 步 桔 2 共 4 步 
您 是 否 项 望 包含 : 
路 巷 于 机 
厂 上 下 文 相关 帮助 
F 3D 外 观 
您 希望 包含 什么 其 他 支持 ? 
厂 自动 操作 岂 
末 ActiveX 控件 [CC 
您 项 望 包含 WOSA 支持 吗 ? 


厂 Windows Sockets MI 


对 话 框 的 标题 是 ， 
医用 播放 可 


sn | _ 珊 
9.5 去 掉 “" 关 于 "对 话 框 ”选项 
(4) 单 击 “ 完 成 ”按钮 ， 完 成 播放 器 工程 的 相关 设置 。 


全 注意 : 由 于 本 实例 程序 不 包含 套 接 字 相关 功能 ， 所 以 在 设置 中 并 未 选择 工程 支持 套 接 字 
选项 。 


9.2.2 ”设计 窗口 
用 户 在 播放 器 工程 的 资源 管理 器 中 ， 可 以 看 到 VC 已 经 为 该 工程 创建 了 一 个 默认 的 对 
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话 框 ， 如 图 9.6 所 示 。 但 是 用 户 可 以 根据 需要 修改 该 对 话 框 的 界面 。 


- IDD WY PIALOG 1 


图 9.6 默认 对 话 框 


用 户 可 以 用 鼠标 将 控件 拖 动 到 对 话 框 面板 上 ， 并 且 调 整 各 控件 的 大 小 以 及 位 置 。 调 整 
后 的 界面 效果 如 图 9.7 所 示 。 


图 9.7 调整 后 的 播放 器 界面 效果 
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用 户 在 进行 播放 器 界面 设计 时 ， 使 用 了 很 多 子 窗口 控件 。 关 于 各 个 控件 的 ID、 属 性 以 
及 作用 ， 如 表 9.4 所 示 。 


表 9.4 ”相关 控件 信息 


控件 ID 控件 作用 
IDC TUPIAN 定时 显示 图 片 
IDC PLAY 播放 音乐 
控件 ID 控件 作用 
IDC ZANTING 暂停 播放 音乐 
IDC STOP 停止 播放 音乐 
IDC PRE 播放 上 一 首 音 乐 
IDC NEXT 播放 下 一 首 音乐 
IDC ADD 添加 音乐 
IDC_PROGRESS1 显示 音乐 播放 进度 
IDC_TAB1 显示 音乐 列表 


用 户 通 过 本 节 中 的 内 容 ， 应 该 了 解 了 在 VC 中 通过 资源 管理 器 设计 实例 程序 界面 的 方 
法 。 关 于 各 个 控件 的 具体 使 用 方法 将 在 9.3 节 中 讲解 。 


9.3 界面 初始 化 


用 户 VC 开发 环境 下 编程 ， 可 以 调用 MFC 函数 实现 窗口 或 者 窗口 中 各 个 控件 的 初始 
化 状态 以 及 实现 方法 。 因 此 ， 在 本 节 中 将 向 用 户 详细 讲解 播放 器 窗口 界面 中 各 个 控件 的 初 
台 化 编程 。 


9.3.1 控件 初始 化 


在 9.2 节 中 ， 用 户 通过 VC 资源 管理 器 设计 了 播放 器 的 界面 ， 保 存 项 目 并 且 运 行 ， 程 
序 运行 后 的 界面 如 图 9.8 所 示 。 播 放 器 运行 之 后 ， 用 户 可 以 看 到 界面 上 的 控件 都 没有 实现 
其 应 有 的 功能 。 这 是 因为 ,用 户 并 没有 为 各 个 控件 编写 相应 的 功能 代码 。 所 以 , 在 本 节 中 ， 
将 向 用 户 介绍 播放 器 窗口 中 各 个 控件 的 初始 化 状态 编程 。 

在 程序 初始 化 时 ， 为 了 避免 用 户 的 误 操 作 而 造成 程序 发 生 异常 。 所 以 ， 关 于 播放 控制 
的 按钮 都 必须 处 于 禁用 状态 ， 如 图 9.9 所 示 。 

用 户 禁用 播放 控制 按钮 功能 ， 应 该 是 在 程序 初始 化 函数 CMyDlg::OnInitDialog0 中 实 
现 。 在 VC 中 实现 该 功能 可 以 调用 MFC 函数 库 中 的 函数 GetDlgItem0 获 取 指 定 ID 控件 的 
指针 ， 然 后 使 用 该 指针 调用 函数 EnableWindow0 将 控件 窗口 禁用 。 代 码 如 下 : 


BOOL CMyD1g::OnInitDialog() 
{ 


CDialog: :OnInitDialog(); 
SetIcon(m hicon, TRUE); 
SetIcon(m hIicon, FALSE); 
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六 实用 播放 加 


音乐 播放 器 Y1.0 


9.8 ”播放 器 运行 界面 


9.9 ”禁用 播放 控制 按钮 


GetDlgItem (IDC PLAY)->EnableWindow (false); // 禁 用 各 个 播放 控制 按钮 
GetDlgItem(IDC ZANTING)->EnableWindow (false); 

GetDlgItem(IDC PRE)->EnableWindow (false); 

GetDlgItem(IDC NEXT)—->EnableWindow (false); 

GetDlgItem(IDC STOP)->EnableWindow (false); 

Se // 省 略 部 分 代码 


return TRUE7 
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9.3.2 ”图片 控件 初始 化 


在 程序 启动 时 为 了 美化 界面 ， 用 户 还 应 该 在 界面 窗口 的 图 片 控件 中 显示 程序 初始 化 图 
片 。 在 控件 中 显示 位 图 将 使 用 到 函数 StretchBlt0， 该 函数 原型 如 下 : 

BOOL StretchBlt( 

HDC hdcDest, 

int nxoriginDest, 

int nYoriginDest, 

int nWidthDest, 

int nHeightDest, 

HDC hdcsrc, 

int nxoriginsrc, 

int nYoriginsrc, 

int nWwidthsrc, 

int nHeightsrc, 

DWORD dwRop 
), 


该 函数 的 作用 是 将 兼容 设备 DC 中 的 位 图 按照 目标 DC 的 实际 大 小 进行 粘贴 。 该 函数 
若 调用 成 功 ， 则 返回 true。 否 则 ， 将 返回 false。 部 分 参数 如 下 : 
口 参数 hdcDesthdcDest 表示 目标 DC 的 句柄 。 
口 参数 nXOriginDest、nYOriginDest、nWidthDest、nHeightDest 需要 组 合 使 用 ， 表 示 
目标 DC 中 被 用 来 显示 位 图 的 区 域 大 小 。 
口 参数 hdcSrc 表示 存放 位 图 的 兼容 DC 句柄 。 
口 参数 nXOriginSrec、nYOriginSrc、nWidthSrc、nHeightSrc 需要 组 合 使 用 ， 用 于 指定 
兼容 DC 中 将 被 显示 的 位 图 区 域 。 
口 参数 dwRop 表示 位 图 显示 方式 。 一 般 情况 下 ， 该 值 设置 为 SRCCOPY， 表 示 位 图 
将 从 兼容 DC 中 被 直接 复制 到 目标 DC 中 。 如 果 用 户 需要 使 用 该 参数 的 其 他 取 值 ， 
可 以 参考 MSDN。 
例如 ， 在 该 实例 程序 界面 中 随机 显示 一 幅 位 图 ， 位 图 资源 ID 为 IDB_BITMAP1。 代 码 
如 下 : 


本 // 省 略 部 分 代码 
bit=::LoadBitmap (AfxGetApp() ->m hInstance,MAKEINTRESOURCE (IDB BITMRAP1) ) 7 
// 读 取 位 图 资源 并 返回 其 句柄 
dcl=::CreateCompatibleDC (::GetDC (::GetDlgItem(this->m hWnd, IDC_TUPIA 
N))); 
// 创 建 与 位 图 控件 相 兼容 的 设备 DC 
::SelectObject (dcl,bit)7 // 将 位 图 资源 句柄 选 入 设备 兼容 Dc 中 
: :StretchB1lt(: :GetDCc(::GetD1gItem(this->m hwnd,IDC TUPIAN)),1,1,450,80, 
dcl1,0,0,400,330,SRCCOPY); 
// 调 用 API 函数 将 兼容 DC 中 的 位 图 复制 到 目 
标 Dc 中 
本 // 省 略 部 分 代码 
首先 ,用 户 读 取 位 图 资源 到 应 用 程序 中 ， 再 创建 与 目标 DC 的 兼容 DC 并 返回 其 句柄 。 
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然后 使 用 函数 
将 兼容 DC 中 

如 果 用 户 
将 实现 该 功能 
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SelectObject0 将 读 取 的 位 图 选 入 到 兼容 设备 DC 中 ， 再 调用 函数 StretchBltO 
的 位 图 直接 复制 到 目标 DC 中 。 

为 了 使 该 位 图 在 界面 中 一 直 进 行 显示 并 且 直 到 程序 窗口 关闭 ， 那 么 用 户 只 能 
的 代码 添加 到 函数 CMyDlg::OnPaint0 中 。 因 为 ， 在 窗口 发 生 重 绘 时 ， 程 序 都 


会 调用 函数 OnPaint0 实 现 界面 重 绘 工作 。 代 码 如 下 : 


void CMyD1g::OnPaint() 


下 
bl 
{ 


} 


IsIconic()) 

CPaintDC dc (this); // 定 义 设 备 上 下 文 对 象 

SendMessage (WM ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0); 
// 省 略 部 分 代码 


CRect rect; 
GetClientRect (&rect) 7 
int x = (rect.Width() - czxIcon + 1) / 27 

int Y = (rect.Height() - cyIcon + 1) / 2; 
dc.DrawIcon (x, y, m hIcon); // 重 绘 程 序 窗口 图 标 


else 


{ 
} 


CDialog::OnPaint (); // 调 用 其 基 类 的 相应 函数 


::SelectObject (dcl,bit) 7 // 将 位 图 资源 句柄 选 入 设备 兼容 DC 中 
::StretchBlt (::GetDC(::GetDlgItem(this->m hWnd,IDC TUPIAN)),1,1,450,80, 


dc1,0,0, 
} 
在 程序 中 


400, 330, SRCCOPY) ; 
// 调 用 API 函数 将 兼容 DC 中 的 位 图 复制 到 目标 DC 中 


， 用 户 在 函数 SelectObject0 中 ， 使 用 了 两 个 句柄 变量 dcl 和 bit， 分 别 表示 兼 


容 设 备 DC 句柄 和 位 图 资源 句柄 ,函数 SelectObjectO 的 作用 是 将 位 图 资源 句柄 bit 选 入 到 兼 


容 设 备 DC 中 。 如 果 用 户 在 该 函数 中 使 用 句柄 dcl 和 bit， 则 需要 在 窗口 类 CMyDlg 中 进行 
声明 ， 并 且 在 窗口 初始 化 函数 中 进行 初始 化 。 代 码 如 下 : 
class CMyD1lg : public CDialog // 窗 口 类 cMyD1g 
public: 
CMyD1lg (CWnd* pParent = NULL); 
HBITMAP bit; // 位 图 句柄 
HDC dcl; // 兼 容 DC 
Se // 省 略 部 分 代码 
} 
BOOL CMyD1g::OnInitDialog() // 窗 口 初始 化 函数 
t 
CDialog: :OnInitDialog(); 
SetIcon(m hIicon, TRUE); 
SetIcon (m hIicon, FALSE); 
GetDlgItem(IDC PLAY)->EnableWindow (false); // 禁 用 控件 


GetD1gItem(IDC ZANTING)->EnableWindow (false); 
GetDlgItem(IDC PRE)->EnableWindow (false); 
GetDlgItem(IDC NEXT)->EnableWindow (false); 
GetDlgItem(IDC STOP)->EnableWindow (false); 
bit=::LoadBitmap (AfxGetApp() ->m hInstance,MAKEINTRESOURCE (IDB BITMAP 


1)); 
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// 读 取 位 图 资源 并 返回 其 句柄 


dc1=: :CreateCompatibleDC (::GetDC (::GetDlgItem (this->m hWnd, IDC TUPIA 
N))); 

// 创 建 与 位 图 控件 相 兼 容 的 设备 DC 

// 省 略 部 分 代码 


return TRUE; 


代码 中 , API 函数 LoadBitmap0 的 作用 是 读 取 位 图 资源 IDB_BITMAP1 到 应 用 程序 中 ， 
并 返回 其 位 图 句柄 。 然 后 ， 使 用 函数 CreateCompatibleDCO 创 建 与 位 图 控件 相 兼容 的 设备 
DC 并 返回 其 句柄 。 保 存 程序 并 运行 ， 如 图 9.10 所 示 。 


图 9.10 程序 初始 化 运行 界面 


9.3.3 TAB 控件 初始 化 


如 果 程序 启动 后 ， 其 所 在 目录 中 没有 响应 歌曲 ， 则 在 TAB 控件 中 提示 用 户 “播放 器 
中 没有 任何 歌曲 ”需要 添加 歌曲 。 否 则 ， 播 放歌 曲 。 首 先 ， 使 用 快捷 键 Ctrl+W 打开 应 用 
程序 向 导 的 Member Variables 选项 卡 ， 为 TAB 控件 添加 相关 变量 ， 如 图 9.11 所 示 。 然 后 ， 
在 ID 列表 中 选择 IDC_TAB1 选项 ， 再 单 击 Add Variables 按钮 添加 该 ID 控件 对 象 ， 如 图 
9.12 所 示 。 
用 户 可 以 通过 添加 成 员 变量 对 话 框 修改 变量 名 称 为 m_tab。 使 用 CTabCtrl 类 对 象 m_tab 
在 TAB 控件 中 添加 属性 页 ， 实 现 该 功能 的 函数 是 mnsertItem0， 其 原型 如 下 : 


BOOL InsertItem( UINT nMask, int nItem, LPCTSTR lpszItem, int nImage, LPARAM 
lParam ); 
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Message Maps Memberyariables | Automation | ActiveX Events | Class Info | 


Project: Class name: Add Class... ~ 


实用 播放 器 可 JcmyDig -| 
C4.4 实 用 播放 器 Dig.h, C4..4 实 用 播放 器 Dig.cpp _ add Variable.. | 
Control IDs: Type Member Delete Variable | 
IDC_NEXT a 

IDC_PLAY Update Columns 
IDC 


PRE 
IDC_PROGRESS1 CProgressCtrl = m_process Bind AN 


IDC_SOUSUOMULU 
IDC_SOUSUOMULU2 
STA1 


IDC : 
IDC_STOP 
IDC_TUPIAN 于 
IDC_ZANTING “ 
Description: 
取消 


Member variable name: 
Im_tab 


Category: 
Control 


Variable type: 
CTabCtrl 


Description: 
map to CTabCtrl member 


图 9.12 添加 TAB 控件 相关 变量 


该 函数 的 作用 是 在 TAB 控件 中 插入 属性 页 。 部 分 参数 如 下 : 
口 参数 mMask 表示 属性 页 状态 标志 ,在 本 章 中 指定 为 TCIF_TEXT, 表示 该 属性 页 的 
标题 文字 有 效 。 

口 参数 nItem 表示 将 操作 的 属性 页 序号 。 

口 参数 lpszItem 表示 属性 页 标题 。 

该 函数 的 其 他 参数 均 可 以 设置 为 NULL。 例如 , 在 程序 中 调用 该 函数 向 TAB 控件 中 插 
入 “播放 列表 ”以 及 “搜索 歌曲 ”两 个 属性 页 。 代 码 如 下 : 

BOOL CMyD1g::OnInitDialog() 


CDialog: :OnInitDialog(); 


a // 省 略 部 分 代码 
m tab.InsertItem(TCIF_TEXT, 0, "播放 列表 ", NULL, NULL); 
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// 添 加 播放 列表 属性 页 
m tab.InsertItem(TCIF_TEXT,1, "搜索 歌曲 ", NULL, NULL) ; // 添 加 搜索 歌曲 属性 页 
} 
程序 中 调用 函数 CTabCtrl::InsertItem0 向 TAB 控件 中 添加 两 个 属性 页 ， 分 别 是 播放 列 
表 和 搜索 歌曲 。 和 运行 代码 ， 用 户 可 以 在 界面 中 看 到 这 两 个 属性 页 ， 如 图 9.13 所 示 。 


图 9.13 添加 属性 页 


如 果 用 户 在 TAB 控件 中 添加 属性 页 成 功 ， 便 可 以 向 该 控件 中 添加 列表 控件 和 按钮 控 
件 实现 各 个 属性 页 界面 。 界 面 中 添加 的 控件 ， 如 表 9.5 所 示 。 
表 9.5 界面 中 的 控件 


控 件 ID 控件 类 型 控件 作用 
IDC_LIST2 列表 控件 显示 歌曲 列表 


IDC_ SOUSUOMULU 按钮 控件 搜索 本 目录 下 的 歌曲 


IDC_ SOUSUOMULU2 按钮 控件 搜索 本 地 所 有 歌曲 


用 户 将 表 9.5 中 所 示 的 控件 添加 到 界面 中 后 ， 需 要 根据 属性 页 的 不 同 而 选择 性 的 显示 
这 些 控件 。 例 如 ， 当 程序 显示 属性 页 “播放 列表 ”时 ， 只 能 有 列表 控件 显示 ， 其 他 控件 则 
隐藏 .在 MFC 中 ,如 果 TAB 属性 页 状态 发 生 改变 , 那么 系统 会 发 送 消息 TCN_SELCHANGE 
到 其 父 窗口 中 。 用 户 可 以 响应 该 消息 进行 判断 属性 页 的 当前 状态 。 根 据 用 户 当前 所 查看 的 
属性 页 ， 调 整 各 个 控件 的 显示 状态 。 代 码 如 下 : 

void CMYD1g: :OnSelchangeTabl (NMHDR+ pNMHDR, LRESULT* PResult) 


{ 
int n=m tab.GetCursel (); // 返 回 当前 属性 页 的 序号 


Switch (n) 


i 
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case 0: // 显 示 播放 列表 属性 页 
{f 
GetD1gItem (IDC_SOUSUOMULU) ->ShowWindow (false) 7 // 隐 藏 按钮 控件 
GetDlgItem (IDC SOUSUOMULU2)->ShowWindow (false); 
GetDlgItem (IDC LIST2)->ShowWindow (true); // 显 示 列 表 控件 
break; 
} 
case 1: // 显 示 搜 索 歌 曲 属性 页 


GetDlgItem(IDC_SOUSUOMULU) ->ShowWindow (true); // 显 示 搜索 目录 按钮 
GetDlgItem(IDC SOUSUOMULU2)->ShowWindow (true); 


GetDlgItem (IDC LIST2)->ShowWindow (false); // 隐 藏 列表 控件 
break; 

} 

*pResult = 0; 


} 


在 程序 中 , 用 户 调用 函数 CTabCtrl::GetCurSel0 返 回 当前 显示 的 属性 页 序号 。 然 后 根据 
该 序号 设置 各 个 控件 的 显示 或 者 隐藏 状态 ， 如 图 9.14 和 图 9.15 所 示 。 


BN 本 ps 
播放 列表 | 搜索 歌曲 | 
歌曲 名 演唱 者 歌曲 类 型 文件 路 径 
音乐 播放 器 Y1.0 


图 9.14 显示 播放 列表 


用 户 在 程序 中 实现 各 个 控件 的 显示 状态 以 后 , 本 章 有 关 TAB 控件 初始 化 的 工作 就 基本 
完成 了 。 请 用 户 在 学 习 过 程 中 , 可 以 试 着 在 实例 程序 的 基础 上 添加 一 些 TAB 控件 的 其 他 功 
能 。 这 样 ， 有 助 于 用 户 加 深 理 解 TAB 控件 的 用 法 。 


本 
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| 音乐 播放 器 Y1.0 


图 9.15 显示 搜索 属性 页 


用 户 在 上 一 节 中 向 TAB 属性 页 中 添加 了 列表 控件 ， 该 列表 用 于 显示 已 经 存在 的 歌曲 。 
在 本 节 中 ， 将 向 用 户 介绍 列表 控件 的 初始 化 。 首先， 利用 应 用 程序 向 导 为 列表 控件 关联 
CListctrl 对 象 ， 并 将 对 象 名 称 设 置 为 m_list， 如 图 9.16 所 示 。 


Add 下 eaber Yariable 


Member variable name: 


m_list 
Cancel 


Category: 
Control | 
Variable type: 

CListCtrl ™| 


[Ed 


Description: 
map to CListCtrl member 


图 9.16 添加 列表 控件 对 象 


然后 , 在 对 话 框 初始 化 函数 OnInitDialog0 中 ,调用 CListctrl 类 相关 函数 对 列表 控件 进 
行 初始 化 。 代 码 如 下 : 


BOOL CMyD1g::OnInitDialog() 


{ 
CDialog::OnInitDialog(); 


We 
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a // 省 略 部 分 代码 
LVCOLUMN lv; // 定 义 LVCOLUMN 结构 变量 
lv.mask=LVCEF TEXT|LVCE FMT|LVCEF WIDTH; // 填 充 LVCOLUMN 结构 体 
1v.fmt=LVCEMT CENTER; 
lv.pszText=" 歌 曲名 "; 
lv.cx=100; // 设 置 项 目 宽度 
m list.InsertColumn (0, &lv); // 插 入 项 目 


lv.pszText=" 歌 曲 长 度 "; 
m list.InsertColumn (1, &lv); 
lv.pszText=" 歌 曲 类 型 "; 
m list.InsertColumn (2, &lv); 


} 
用 户 将 以 上 代码 编译 运行 ， 将 看 到 一 个 具有 项 目标 题 的 列表 控件 ， 如 图 9.17 所 示 。 


| Eall mal eal el Ew 


ne 


演唱 者 歌曲 关 型 文件 路 径 


| 音乐 播放 器 V1. 0 
图 9.17 初始 化 后 的 列表 控件 


在 本 节 中 ， 主 要 向 用 户 介 绍 了 音乐 播放 器 界面 初始 化 的 方法 以 及 各 个 控件 的 使 用 等 。 
通过 本 节 的 学 习 ， 用 户 应 该 掌握 TAB 控件 与 列表 控件 的 基本 使 用 方法 。 


9.3.4 进度 条 、 状 态 栏 

在 程序 中 ， 进 度 条 的 作用 是 指示 歌曲 的 播放 位 置 以 及 歌曲 搜索 的 进度 等 。 而 状态 栏 的 
作用 是 显示 一 些 提示 信息 给 用 户 或 者 播放 器 的 使 用 方法 等 。 

1. 进度 条 


在 MFC 中 ， 进 度 条 控件 类 是 CProgressCtrl， 本 节 将 使 用 该 控件 类 的 相关 函数 实现 进 
度 条 的 各 个 功能 。 在 程序 中 ， 初 始 化 进度 条 长 度 的 函数 是 CProgressCtrl::SetRange320。 其 


.254 。 


第 9 章 实用 播放 器 
原型 如 下 : 
void SetRange32( int nLower, int nUpper ); 


该 函数 用 于 指定 进度 条 的 作用 范围 。 其 参数 分 别 表示 最 小 值 与 最 大 值 。 例 如 ， 将 进度 
条 的 作用 范围 设置 为 0~100。 代 码 如 下 : 


m process. SetRange32( 0,100 ); // 设 置 进度 条 作用 范围 为 0 一 100 


各 注意 : 进度 条 的 作用 范围 最 小 值 不 能 小 于 0。 
获取 或 设置 进度 条 当前 位 置 的 函数 分 别 是 Getpos0 和 SetPos0。 其 原型 如 下 : 


// 获 取 进 度 条 当前 位 置 
// 设 置 进度 条 当前 位 置 


int GetPos( ); 
int SetPos( int nPos ); 


函数 GetPosO 调 用 成 功 , 将 返回 进度 条 的 当前 位 置 。 函数 SetPosO0 用 于 设置 进度 条 的 当 


前 位 置 ， 其 参数 nPos 表示 将 设置 的 位 置 索 引 。 例 如 ， 使 进度 条 的 当前 位 置 前 进 10 个 单位 
索引 。 代 码 如 下 : 


本 // 省 略 部 分 代码 
m process. SetRange32( 0,100 ); // 设 置 进度 条 作用 范围 为 0 一 100 
int i=m process.GetPos(); // 获 得 当前 位 置 索引 
m process.SetPos (i+10); // 设 置 当 前 位 置 索引 为 i+10 
// 省 略 部 分 代码 


设置 进度 条 位 置 的 步 进 变化 ， 可 以 使 用 函数 SetStep0 和 StepItO 实 现 。 其 原型 如 下 : 


int SetStep( int nstep ); 
int StepIt(); 


函数 SetStepO 调 用 成 功 ， 将 返回 进度 条 变化 前 的 位 置 索引 。 其 参数 nStep 指定 进度 条 


变化 的 单位 量 。 函 数 StepIt 是 执行 步 进 操作 。 例 如 ， 使 进度 条 每 次 前 进 5 个 单位 。 代 码 


如 下 : 
区 要 // 省 略 部 分 代码 
m process. SetRange32( 0,100 ); // 设 置 进度 条 作用 范围 为 0 一 100 
int i=m process.GetPos(); // 获 得 当前 位 置 索引 
m process.SetPos (i+10); // 设 置 当 前 位 置 索引 为 i+10 
while (m_process.GetPos ()<=100) // 如 果 进 度 条 当前 位 置 小 于 100 
1 
m process. SetStep (5) // 进 度 条 每 次 以 5 个 单位 进行 变化 
m_process.StepIt() 7 // 执 行 步 进 操作 
/ /省略 部 分 代码 


在 代码 中 ， 进 度 条 以 5 个 单位 进行 位 置 变化 ， 如 图 9.18 所 示 。 


在 本 实例 程序 中 ， 进 度 条 主要 被 用 于 指示 歌曲 的 播放 进度 。 所 以 ， 只 需要 将 进度 条 的 
范围 设置 为 音乐 文件 的 长 度 即 可 。 然 后 ， 根 据 已 读 取 的 文件 长 度 占 总 长 度 的 大 小 设置 进度 
条 的 当前 位 置 。 


Ts 
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四 
区 | 世 汪 | 诺 到 | 座 Di 诺 绰 话 写 


44367760/0000 


心 蓝 


一 起 走 过 的 日 
原来 我 有 和 要 ( 
月 者 国语) 
月 老 


图 9.18 变化 中 的 进度 条 


一 般 ， 用 户 在 程序 中 需要 使 用 状态 栏 显 示 一 些 该 程序 的 相关 帮助 信息 。 用 户 在 程序 中 
创建 状态 栏 应 该 首先 在 主 对 话 框 类 CMyDlg 中 定义 一 个 状态 栏 句柄 对 象 statu。 然 后 ， 在 对 
话 框 初始 化 函数 OnInitDialog0 中 , 使 用 函数 API 函数 创建 状态 栏 并 返回 其 句柄 。 该 函数 原 
型 如 下 : 

HWND CreateStatusWindow( 

LONG style, 
LPCTSTR lpszText, 
HWND hwndParent, 
UINT wID 

); 


该 函数 的 作用 是 创建 状态 栏 对 象 并 返回 其 句柄 。 该 函数 具有 4 个 参数 , 意义 分 别 如 下 : 

口 参数 style 表示 状态 栏 创建 时 所 指定 的 窗口 样式 。 其 取 值 一 般 可 以 设置 为 
WS_CHILDIWS_VISIBLE， 表 示 用 户 所 创建 窗口 的 子 窗口 并 且 是 显示 的 。 如 果 用 
户 还 需要 为 状态 栏 指定 其 他 窗口 样式 ， 则 可 以 参考 MSDN。 

口 参数 lpszText 表示 用 户 将 在 状态 栏 上 显示 的 文字 信息 。 

口 参数 hwndParent 表示 状态 栏 的 父 窗口 句柄 。 用 户 在 程序 中 可 以 使 用 this 指针 获取 
该 句柄 。 例 如 ，this->m_hWnd 或 this->GetParent0->m_hWnd。 

从 注意 : 上 面 所 讲 的 this 指针 在 程序 中 ， 表 示 对 象 本 身 。 

口 参数 wID 指定 状态 栏 的 窗口 ID. 用 户 指定 的 该 ID 值 必须 是 在 程序 中 定义 的 ID 值 。 
例如 ， 用 户 定义 的 ID 值 是 IDC_123， 代 码 如 下 : 

#define IDC 123 3251 


如 果 用 户 在 窗口 中 创建 一 个 状态 栏 用 于 显示 相关 消息 ， 则 应 该 首先 在 头 文件 “实用 播 
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放 器 Dlg.h” 中 定义 一 个 状态 栏 句柄 。 代 码 如 下 : 


class CMyDlg : public CDialog // 主 窗口 类 定义 
{ 
public: 
CMyDlg (CWnd* pParent = NULL); 
HWND statu; // 定 义 状态 栏 句柄 
/ /省略 部 分 代码 


i 
然后 , 用户 在 窗口 初始 化 函数 中 调用 函数 CreateStatusWindow0 创 建 状态 栏 并 为 其 指定 
窗口 也。 代码 如 下 : 
BOOL CMyD1g::OnInitDialog() // 窗 口 初始 化 函数 


CDialog::OnInitDialog (); 
statu=: :CreatestatusWindow (WS_CHILDIWS_VISIBLE, "音乐 播放 器 V1.0",this-> 


m hwnd, IDC 123); 
// 创 建 状态 栏 
3 // 省 略 部 分 代码 
} 
用 户 在 程序 中 添加 以 上 代码 后 ， 编 译 运 行程 序 ， 效 果 如 图 9.19 所 示 。 


图 9.19 成 功 创建 状态 栏 


如 果 用 户 在 程序 编写 过 程 中 需要 在 状态 栏 上 显示 信息 ， 则 可 以 直接 使 用 状态 栏 句 柄 
statu 即 可 。 例 如 ， 用 户 在 状态 栏 内 显示 系统 当前 时 间 。 代 码 如 下 : 


void CMYD1g: :OnTimer (UINT nIDEvent) 
{ 


CTime time; // 定 义 时 间 类 对 象 

time .GetCurrentTime () 7 // 获 取 系 统 当前 时 间 
CString str=time.Format (" 当 前 时 间 : % H: % M:%S"); // 格 式 化 字符 串 
: :SetWindowText (statu, str); // 设 置 状 态 栏 显示 的 文字 


} 
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上 面 的 程序 运行 之 后 ， 会 在 状态 栏 上 显示 当前 系统 的 时 间 ， 如 图 9.20 所 示 。 


并 实用 播放 加 


~ > 


播放 列表 | 搜索 歌曲 | 
歌曲 名 演唱 者 文件 路 径 “|[ 


图 9.20 在 状态 栏 内 显示 当前 时 间 


9.4 添加 消息 映射 


用 户 在 VC 编译 器 中 ， 可 以 使 用 MFC 的 消息 映射 功能 为 界面 中 的 各 个 子 控件 添加 相 
应 的 功能 响应 函数 。 例 如 ， 用 户 对 按钮 控件 的 单 击 操作 等 。 在 控件 的 消息 响应 函数 中 ， 用 
户 通过 编写 代码 以 实现 真正 意义 上 的 控件 功能 。 在 本 节 中 ， 将 向 用 户 具体 介绍 MFC 消息 
映射 表 的 功能 以 及 在 程序 中 手动 添加 消息 映射 宏 的 方法 。 


9.4.1 MFC 消息 映射 表 


在 MFC 中 ， 消 息 映射 表 的 作用 是 将 用 户 对 控件 的 一 些 操作 消息 与 该 消息 的 响应 函数 
相关 联 。 但是， 由 于 消息 映射 表 的 结构 定义 很 复杂 且 用 户 使 用 起 来 不 方便 。 所 以 ,在 MFC 
中 使 用 消息 映射 宏 进 行 消息 映射 功能 。 例 如 ， 用 户 在 MFC 程序 中 ， 经 常会 看 见 编译 器 自 
动 添加 的 一 些 消 息 映射 宏 代码 。 代 码 如 下 : 


区 // 省 略 部 分 代码 
BEGIN MESSAGE MAP (CMY121D1g，CDialog) // 开 始 消息 映射 
//{{AFX MSG MAP (CMY121D19) 

ON_WM PRINT () // 系 统 刷新 消息 映射 
ON_MESSAGE (MCI NOTIFY, ONnot) // 自 定义 消息 映射 
//}}AFX MSG MAP 

END MESSAGE MAP() // 结 束 消息 映射 


在 以 上 代码 中 ， 消 息 是 与 消息 响应 函数 通过 消息 映射 宏 联 系 起 来 并 成 对 出 现 。 例 如 ， 
当 窗 口 程序 接收 到 消息 MCI_NOTIFY 后 , 程序 将 调用 与 该 消息 相对 应 的 响应 函数 ONnotO 
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实现 相应 的 功能 


全 注意 : 用 户 在 消息 映射 宏 中 ， 可 以 通过 向 导 程序 添加 一 些 系统 定义 消息 。 如 果 是 用 户 自 

定义 的 消息 ， 则 用 户 只 能 在 消息 映射 宏 中 手动 添加 消息 映射 代码 。 

用 户 在 消息 映射 宏 中 ， 所 使 用 的 消息 响应 函数 必须 首先 在 窗口 类 中 进行 声明 。 例 如 ， 

用 户 消息 响应 函数 ONnot0 的 声明 。 代 码 如 下 : 

class CMVY121D1g : public CDialog 

{ 

protected: 
//{{AFX MSG (CMy121D1g) 
Virtual BOOL OnInitDialog(); 


afx msg void OnPaint (); 


afx msg void ONnot () 7 // 消 息 响 应 函数 的 声明 


//}}AFX MSG 
i / /省略 部 分 代码 
} 
如 果 用 户 使 用 的 消息 类 型 是 自 定义 ， 那 么 还 需要 在 类 定义 之 外 定义 该 消息 。 否 则 ， 程 
序 运行 时 会 发 生 错 误 。 例如， 用 户 自 定义 消息 MCI_NOTIFY， 代 码 如 下 : 
#define MCI_ NOTIFY WM USER+100 


以 上 几 个 步骤 是 用 户 响 应 一 个 自 定义 消息 并 实现 其 功能 必须 操作 的 步骤 。 


9.4.2 ”使 用 消息 映射 宏 


在 MFC 中 ， 由 于 消息 映射 表 结构 对 于 程序 员 而 言 较为 复杂 ， 所 以 ，MFC 使 用 消息 映 
射 宏 代替 了 消息 映射 表 结构 。 


消息 映射 宏 


用 户 在 实际 编程 时 ， 使 用 的 消息 映射 宏 是 DECLARE MESSAGE_MAP 、 
BEGIN_MESSAGE MAP 以 及 END MESSAGE_ MAP。 部 分 定义 代码 分 别 如 下 : 


#define DECLARE MESSAGE MAP() \ // 定 义 消息 映射 宏 DEC- 
LARE MESSAGE MAP 
private: \ 

static const AFX MSGMAP ENTRY messageEntries[]; \ 
protected: \ 

static AFX DATA const AFX MSGMAP messageMap; \ 

static const AFX MSGMAP* PASCAL GetBaseMessageMap(); \ 

virtual const AFX MSGMAP* GetMessageMap () const; \ 
#define BEGIN MESSAGE MAP (theClass, baseClass) \ 


// 定 义 消息 映射 宏 BEGIN_MESSAGE MRP 


/ /省略 部 分 代码 
REX COMDAT const AFX MSGMAP ENTRY theClass:: messageEntries[] = \ 
RN 
#define END MESSAGE MAP() \ // 定 义 消息 映射 宏 END MESSAGE MAP 


{0, 0, 0, 0, AfxSig end, (AFX PMSG)0 } \ 
ji 


以 上 代码 便 是 MFC 消息 映射 宏 的 定义 代码 。 在 代码 中 , DECLARE_MESSAGE_MAP 
包含 了 消息 映射 所 必须 的 变量 和 函数 方法 。 而 BEGIN MESSAGE MAP 则 包含 了 这 些 变 量 


5 


第 2 篇 ”Visual C++ 网 络 编程 典型 应 用 
的 初始 化 以 及 函数 的 实现 方法 。 最 后 ，END_MESSAGE_ MAP 结束 消息 映射 宏 。 
名 注意 : 在 宏 BEGIN_MESSAGE_MAP 中 有 两 个 参数 theClass 和 baseClass， 分 别 表示 调 
用 该 宏 的 类 名 以 及 该 类 的 父 类 名 。 
例如 ， 用 户 希 望 一 个 新 建 类 具有 消息 映射 功能 ， 则 首先 应 该 在 该 类 的 定义 中 添加 宏 
DECLARE MESSAGE_MAPO， 表 示 该 类 支持 消息 映射 。 代 码 如 下 : 


class CMVYD1g : public CDialog 
i 
9 // 具 体 的 类 定义 
DECLARE MESSAGE MAP() // 表 示 该 类 支持 消息 映射 功能 
} 


然后 ， 再 在 该 类 实现 文件 中 添加 消息 映射 宏 标 记 。 代 码 如 下 : 


区 // 具 体 的 方法 实现 代码 
BEGIN MESSAGE MRP (CMyD1lg, CDialog) // 开 始 消息 映射 

//{{AFX MSG MAP (CMyD1g) 

ON WM PRINT () // 关 联 消息 与 消息 响应 函数 


ON_WM QUERYDRRGICON () 

ON_NOTIFY (TCN _SELCHANGE，IDC_TRB1，OnSelchangeTabl) 
ON WM TIMER () 

ON BN CLICKED(IDC ADD, OnAdd) 

//}}AFX MSG MAP 


END MESSAGE MAP() // 结 束 消息 映射 
// 省 略 部 分 代码 


用 户 添加 以 上 代码 以 后 ， 新 建 类 便 具有 了 消息 映射 功能 。 如 果 用 户 手 动 添加 消息 响应 
代码 ， 则 只 需要 在 宏 BEGIN MESSAGE MAP 和 END_MESSAGE MAP 之 间 添 加 即 可 。 

2. 添加 消息 响应 函数 

在 本 章 实 例 中 ， 由 于 子 控件 较 多 ， 所 以 将 使 用 MFC 向 导 程 序 为 各 子 控件 添加 相应 的 


消息 响应 函数 。 首 先 ， 用 户 在 VC 主 界面 中 按 下 Ctrl+W 组 合 键 ， 弹 出 MFC ClassWizard 
对 话 框 ， 如 图 9.21 所 示 。 


Message Maps | Member Variables | Antomation | Activex Events | class Info | 
Project: Class name: 
庄 月 播 下 各 了 
C4.4 突 用 播放 器 Dig.h, C4. 实用 播放 器 Dig.cpp 
Object IDs: Messages: 

由 a CalcWindowRect 本 
IDC_ADD |crer 兰 Edh code 
IDC_UST2 DefWindowProc 
IDC_NEXT DestroyWindow 
IDC_PLAY DoDataExchanoe 
IDC_PRE DoModal 
IDC_PROGRESS1 EE GetScrollBarCtrl 所 
Member functione: 
¥ DeDataExchange ~ 
W OnAdd ON_IDC_ADD:BN_CLICKED 
W onDbldkList2 ON_IDC_LISTZ:NM_DBLCLK 
W OnlnitDialog ON_WM_INITDIALOG 
W OnNext ON_IDC_NEXT:BN_CLICKED 3 
Description: 

取消 


9.21 MFC ClassWizard 对 话 框 
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然后 ， 用 户 可 以 在 Object ID 列表 中 找到 相关 控件 ID， 再 在 Messages 列表 中 选中 将 为 
其 添加 的 系统 消息 ， 单 击 Add Function 按钮 即 可 。 

用 户 使 用 该 对 话 框 将 相应 控件 的 消息 响应 函数 添加 完成 之 后 ， 可 以 回 到 代码 中 查看 消 
息 映 射 宏 的 变化 。 代 码 如 下 : 


要 // 省 略 部 分 代码 
BEGIN MESSAGE MAP (CMYD1g，CDialog) // 开 始 消息 映射 
//{{AFX MSG MAP (CMyD1g) 
ON WM PRINT () 
ON_WM QUERYDRAGICON () 
ON_NOTIFY (TCN_SELCHANGE, IDC TAB1, OnselchangeTab]l) 
ON WM TIMER() 


ON BN CLICKED(IDC ADD, OnAdd) // 添 加 歌曲 按钮 的 消息 映射 
ON_BN CLICKED(IDC NEXT, OnNext) // 下 一 首 按钮 的 消息 映射 
ON BN CLICKED(IDC_PLRY，OnPlay) // 播 放 按钮 的 消息 映射 
ON_BN CLICKED (IDC_PRE，OnPre) // 上 一 首 按钮 的 消息 映射 
ON_BN_ CLICKED (TDC_STOP，OnStop) // 停 止 按钮 的 消息 映射 


ON_BN_CLICKED (IDC_SOUSUOMULU，OnSousuomulu) // 搜 索 目录 按钮 的 消息 映射 


ON_BN_ CLICKED (IDC SOUSUOMULU2，OnSousuomulu2) 


ON_BN CLICKED(IDC ZANTING, OnZanting) // 暂 停 按钮 的 消息 映射 
//}}AFX MSG MRP 

END MESSAGE MRP () // 结 束 消息 映射 

3 // 类 实现 代码 


用 户 通过 以 上 代码 可 以 发 现 ， 使 用 应 用 程序 向 导 为 控件 添加 消息 响应 函数 和 使 用 消息 
映射 宏 手 动 添 加 消息 响应 函数 的 效果 是 一 样 的 。 


全 注意 : 用 户 在 本 节 中 所 添加 的 控件 响应 函数 的 实现 方法 ， 将 在 后 面 的 小 节 中 进行 具体 
讲述 。 


9.5 多 线程 通信 


在 实例 程序 中 ， 使 用 多 线程 不 但 可 以 使 程序 同时 处 理 多 个 文件 或 实现 多 个 功能 ， 还 可 
以 利用 多 线程 同步 技术 防止 程序 出 现 资源 共享 问题 。 在 本 节 中 ， 主 要 向 用 户 介绍 实例 程序 
的 线程 分 配 以 及 线程 间 的 通信 。 


9.5.1 线程 分 配 


在 本 实例 中 ， 主 要 的 线程 分 为 播放 线程 和 进度 条 设置 线程 。 用 户 需要 在 播放 线程 中 创 
建 一 个 进度 条 设置 线程 ， 以 便 根 据 当 前 文件 的 播放 状态 设置 进度 条 的 当前 位 置 。 

首先 ， 在 播放 按钮 的 消息 响应 函数 中 使 用 函数 mciSendCommandO0 打 开 音频 设备 并 播 
放 指定 的 MP3 文件 。 代 码 如 下 : 


void CMVYD1g::OnPlay() // 播 放 按钮 消息 响应 函数 
MCI_OPEN PARMS open={0}; // 定 义 并 初始 化 结构 体 
char strl[100]; // 定 义 字符 数组 
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open .lpstrElementName="F:\\ 音 乐 \\11\\ 齐 秦 - 大 约 在 冬季 -wma"7 // 指 定 播放 文件 路 径 


open.lpstrDeviceType="mpegvideo"; // 指 定 播放 设备 
DWORD err; // 定 义 错误 信息 
err=mciSendCommand (0, MCI OPEN,MCI OPEN TYPE1MCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); // 初 始 化 音频 设备 
if (err==0) // 如 果 初 始 化 设备 成 功 
{ 
MCI_PLAY PARMS play; // 定 义 结构 体 变量 
play.dwFrom=0; // 指 定 播放 位 置 为 起 始 位 置 
play.dwCallback=NULL; // 返 回 消息 的 窗口 句柄 为 NULL 
mciSendCommand (open.wDeviceID,MCI PLAY,0, (DWORD) gplay); 

// 播 放 指定 文件 
} 
else // 初 始 化 失败 


mciGetErrorSstring (err, (LPSTR) strl,100) 7 // 获 取 失 败 信息 
MessageBox (str1); // 显 示 失 败 信息 
} 


然后 , 在 函数 OnPlay0 中 调用 函数 CreateThreadO 创 建 进度 条 设置 线程 并 将 其 启动 。 代 
码 如 下 : 


void CMVYD1g::OnPlay() // 播 放 按钮 消息 响应 函数 
3 // 省 略 部 分 代码 
HANDLE hy7 
h=::CreateThread (NULL, 0, setprocess, this->m hWnd,o0,NULL); 
// 创 建 进度 条 设置 线程 
// 省 略 部 分 代码 


这 


在 代码 中 ， 用 户 使 用 函数 CreateThread0 创 建 了 进度 条 设置 线程 并 指定 线程 函数 为 
setprocess()。 该 函数 在 程序 中 必须 声明 为 全 局 函数 。 否 则 ， 系 统 将 创建 线程 失败 。 代 码 
如 下 : 


DWORD WINAPI setprocess (LPVOID lpParameter);  ”// 声 明 线程 函数 
DWORD npos; // 定 义 全 局 变量 用 于 保存 播放 位 置 
class CMVYD1g : public CDialog 
{ 
Di // 省 略 部 分 代码 

现在 ,用 户 在 播放 MP3 文件 的 同时 ， 也 启动 了 进度 条 设置 线程 。 用 户 在 该 线程 函数 中 
可 以 根据 当前 文件 的 播放 进度 设置 进度 条 的 位 置 。 代 码 如 下 : 


DWORD WINRPI setprocess (LPVOID lpParameter) 


Cstring str,strl; // 定 义 字符 串 变 量 

char ch[100]; // 定 义 字符 数组 

MCI_STATUS PARMS stat={0}; // 定 义 并 初始 化 结构 体 变量 

stat .dwItem=MCI STATUS LENGTH; // 获 取 播 放 文 件 总 长 度 

mciSendCommand (open .wDeviceID,MCI_ STATUS,MCI STATUS_ ITEM, (DWORD) &stat); 
// 获 取 播放 文件 时 间 长 度 

npo=&stat .dwReturn; // 返 回 播放 长 度 值 

BYTE a=MCI MSF MINUTE (npo); // 获 取 时 间 长 度 的 分 钟 值 
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BYTE b=MCI MSF SECOND (npo); // 获 取 时 间 长 度 的 秒 值 
npos=MCI MAKE HMS (0,a,b); // 返 回 时 间 组 合 值 
str.Format ("%d",npos); 
stri="/™? // 添 加 符号 "/" 
while(1) 
Sleep(1000) 7 // 线 程 暂停 1 秒 
stat.dwItem=MCI STATUS POSITION ; // 获 取 当 前 播放 状态 标记 
err=mciSendCommand (open.wDeviceID,MCI STATUS,MCI STATUS ITEM, (DWORD) &st 
at); 

// 获 取 文件 的 当前 播放 时 间 
strl.Format ("%d", stat .dwReturn); // 格 式 化 字符 串 
strcat ( (char*) str.GetBuffer (0), (char*) strl.GetBuffer (0)); 

// 连 接 字符 串 
: :SetWindowText ( (HWND) lpParameter, str); // 设 置 控件 标题 
} 
mciGetErrorstring (err, (LPSTR) ch, 100); // 获 取 MCI 错误 信息 
::SetWindowText ( (HWND) lpParameter, (char *)err); // 显 示 错 误 信息 
return 07 


} 
用 户 运行 上 面 的 程序 后 ， 会 在 进度 条 上 方 出 现 当 前 播放 文件 的 时 间 长 度 和 已 播放 文件 
的 时 间 长 度 ， 如 图 9.22 所 示 。 
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和 
| | BE | 上- 首 | 下- 首 | Wm | 
04:03/00:30 


下 可 


郑源 F:\ 音 乐 \11\. 

07， 北 高 与 底 儿 。 张 合 竟 tn, F:\ 音 乐 \11\ 
;音乐 \1\ 

F;\ 音 乐 \1\ 

F;\ 音 乐 \1\ 

;音乐 1\ 


了 :\ 音 乐 \11\ 
生计 各 由 


图 9.22 显示 文件 的 播放 时 间 


在 本 节 中 ， 主 要 向 用 户 讲述 了 实例 中 主要 线程 的 分 配 以 及 各 个 线程 的 具体 实现 方法 。 
通过 本 节 的 学 习 ， 用 户 将 熟练 使 用 MCI 函数 获取 当前 MP3 文件 的 播放 状态 以 及 线程 的 运 
行 等 相关 知识 。 


9.5.2 ”线程 间 通 信 


在 VC 中 ， 实 现 线程 问 通信 的 方法 有 两 种 ， 分 别 是 使 用 全 局 变量 和 使 用 线程 消息 。 在 
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本 实例 中 ， 将 选择 使 用 全 局 变量 实现 线程 间 的 通信 。 用 户 在 实例 程序 中 ， 可 以 根据 播放 列 
表 中 的 音乐 序列 号 判断 MP3 的 播放 顺序 。 首 先 ， 用 户 需 要 在 程序 中 定义 一 个 整 型 变量 
index。 代 码 如 下 : 
int index=0; // 定 义 并 初始 化 全 局 变量 
) 


CMyD1g: :CMyD1lg (CWnd* PParent /*#=NULL* 
: CDialog (CMyD1g::IDD, pParent) 
{ 


ee // 省 略 部 分 代码 
} 
然后 ， 在 列表 控件 的 双击 消息 处 理 函 数 OnDblclkList20 中 ， 用 户 需 要 将 列表 选择 项 的 
索引 赋值 给 全 局 变量 index。 代 码 如 下 : 


void CMyD1g: :OnDblclkList2 (NMHDR* pNMHDR, LRESULT* pResult) 
{ 


se // 省 略 部 分 代码 
POSITION pos=m list.GetFirstSelectedItemPosition(); 
// 获 取 用 户 当前 选中 的 项 目 位 置 
if (pos==NULL) // 判 断 列表 中 是 否 为 空 
让 
MessageBox (" 列 表 为 空 ! ") 7 // 提 示 用 户 列表 为 空 


}" 
else 

{ 

int nItem=m list.GetNextSelectedItem(pos);// 获 取 用 户 选择 的 项 索引 
index=nItem; // 将 索引 值 赋予 全 局 变量 

Se // 省 略 部 分 代码 

和 

在 代码 中 ， 用 户 使 用 了 列表 控件 类 的 成 员 函 数 GetFirstSelectedItemPosition0 和 
GetNextSelectedItem() 获 取 当 前 双击 位 置 的 项 目 索 引 值 。 这 两 个 函数 的 原型 如 下 : 

POSITION GetFirstSelectedItemPosition( ) const; 

int GetNextSelectedItem( POSITION& pos ) const; 

其 中 ， 函 数 GetFirstSelectedItemPosition() 的 作用 是 获取 用 户 当 前 选择 列表 项 的 位 置 ， 
其 返回 类 型 为 POSITION。 而 函数 GetNextSelectedItem0) 则 是 根据 该 列表 项 的 位 置 获取 其 索 
引 值 ， 其 参数 pos 表示 列表 项 的 位 置 。 

用 户 在 列表 中 双击 某 项 后 ， 则 该 项 索引 值 便 被 程序 记录 在 全 局 变量 index 中 了 。 当 用 
户 单 击 “ 上 一 首 ” 或 者 “下 一 首 ”按钮 时 ， 程 序 就 可 以 根据 该 全 局 变量 判断 播放 曲目 的 位 
置 与 顺序 。 有 了 这 个 全 局 变量 ， 程 序 中 便 会 按照 列表 中 的 顺序 或 者 用 户 所 单 击 位 置 的 曲目 
进行 播放 。 


9.6 数据 读 取 与 播放 控制 


在 实例 中 ， 读 取 数 据 是 指 程序 在 启动 时 ， 应 该 从 指定 文件 中 读 取 默认 的 歌曲 列表 到 列 
表 控件 中 进行 显示 。 而 播放 控制 则 是 为 播放 器 界面 中 各 个 功能 按钮 的 消息 响应 函数 添加 相 
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应 功能 的 代码 。 在 本 节 中 ， 主 要 向 用 户 介绍 播放 器 主要 功能 的 代码 编写 及 其 数据 的 存储 
方法 。 


9.6.1 读 取 数 据 

如 果 播 放 器 程序 是 第 一 次 启动 ， 则 用 户 应 该 在 指定 目录 中 创建 相应 文件 对 列表 中 的 曲 
目 相关 数据 进行 存储 。 其 中 ， 主 要 是 存储 曲目 数据 的 名 称 、 大 小 、 类 型 以 及 文件 路 径 。 

1. 封装 曲目 数据 结构 


在 本 实例 中 ， 用 户 为 了 方便 对 曲目 的 相关 数据 进行 操作 ， 应 该 将 这 些 数据 封装 在 一 个 
结构 体 中 。 这 样 ， 用 户 使 用 起 来 比较 方便 。 首 先 ， 将 该 结构 体 命名 为 mp3data， 结 构 定义 
如 下 : 


typedef struct mp3 // 定 义 MP3 文件 数据 结构 体 
) 
char heade[3]; //TAG 字符 标记 
char title[30]; // 音 乐 文件 名 称 
char arti [30]; // 演 唱 者 
CString str; // 路 径 字 符 串 
}mp3datay 


在 该 结构 体 中 , 主要 的 成 员 变量 是 str, 其 表示 MP3 文件 的 完整 路 径 名 。 程序 播放 MP3 
音乐 时 均 根据 该 路 径 搜索 相应 的 MP3 文件 。 
然后 ， 用 户 在 主 对 话 框 类 中 定义 该 自 定义 结构 体 的 变量 。 代 码 如 下 : 
class CMYD1g : public CDialog 
{ 
public: 
mp3data mp3d; // 定 义 结构 体 变量 
os // 省 略 部 分 类 变量 
由 


用 户 定义 结构 体 变量 mp3d 成 功 以 后 ， 便 可 以 在 该 实例 程序 的 任何 地 方 使 用 该 变量 。 
2. 操作 歌曲 列表 文件 


用 户 在 实例 程序 中 ， 需 要 在 程序 启动 时 创建 文件 对 象 并 且 从 该 文件 中 读 取 相应 数据 。 
如 果 文 件 对 象 为 空 ， 表 示 程 序 是 第 一 次 启动 ， 则 用 户 需 要 创建 文件 。 否 则 ， 程 序 读 取 该 文 
件 组 中 的 数据 并 将 这 些 数据 显示 到 列表 控件 中 。 代 码 如 下 : 


BOOL CMyD1g: :OnInitDialog() 


CDialog: :OnInitDialog (); 
CFile filel ("歌曲 列表 .lw",CFile::modeReadWrite|CFile::modeCreate); 
// 创 建文 件 
if (filel.m hFile==NULL) // 若 文件 对 象 为 空 
i 
CFile filel ("歌曲 列表 .lw", CFile: :modeReadWrite|CFile: :modeNoTruncate); 
// 创 建文 件 但 不 覆盖 原 有 文件 
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else // 若 文件 已 经 存在 
// 省 略 部 分 代码 


在 代码 中 ， 用 户 首先 创建 文件 对 象 并 且 将 该 对 象 以 可 读 可 写 方式 关联 到 指定 文件 。 如 
果 该 文件 对 象 句柄 为 空 ， 则 表示 文件 并 不 存在 ， 用 户 需 要 新 建 该 文件 。 和 否则， 用 户 便 可 以 
对 该 文件 进行 读 取 操作 。 代 码 如 下 : 


while (mpd.title!=NULL) // 判 断 获取 的 文件 标题 
| 
filel.Read (gmpd, sizeof (mpd) ) 7 // 读 取 文 件数 据 
int nRow = m list.InsertItem(l1,mpd.title); // 在 列表 中 插入 行 
m list.SetItemText (nRow,1,mpd.arti); // 设 置 数 据 
if(mpd.heade && "TAG") // 表 示 该 文件 为 MP3 文件 
{ 
CString str="MP3"; // 添 加 字符 串 
m list.SetItemText (nRow,2, str); // 设 置 数据 
} 
} 
filel.Close (); // 关 闭 文件 对 象 


用 户 使 用 以 上 代码 对 “歌曲 列表 ”文件 进行 循环 读 取 ， 直 到 该 文件 结束 为 止 ， 并 且 用 
户 将 每 次 读 取 到 的 文件 数据 显示 在 列表 控件 中 ， 如 图 9.23 所 示 。 


纺 交 用 播放 器 


加 | mn) ne) ee] Ta amma 


播放 列表 | 搜索 歌曲 | 


郑源 
07， 北 鳃 与 底 儿 。 张 合 锡 (mm 
Den' t Push Ne Sweetbox 


站 痛 
全 世界 晤 伤心 陈绍 华 
城 里 的 月 光 许 美静 
Never Say Go 
狠 受 上 羊 


04 莎士比亚 
美丽 的 神话 工 


黑龙 


[ERRRRRERRREREEREEER 开 


图 9.23 显示 “歌曲 列表 ”文件 数据 


通过 本 节 的 学 习 ， 用 户 可 以 熟练 地 使 用 列表 文件 进行 数据 的 读 取 与 存储 操作 。 自 定义 
结构 体 mp3data 是 本 实例 中 非常 重要 的 一 个 数据 结构 ， 用 户 必须 学 会 熟练 使 用 并 构造 其 中 
的 成 员 变量 。 
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9.6.2 ”保存 数据 


当 用 户 使 用 播放 器 界面 中 “添加 歌曲 ”按钮 向 播放 器 中 添加 歌曲 时 ， 程 序 应 该 将 该 歌 
曲 文件 的 相应 信息 显示 在 列表 控件 中 和 “歌曲 列表 ”文件 中 进行 存储 。 首 先 ， 在 添加 歌曲 
按钮 的 消息 响应 函数 中 添加 打开 文件 对 话 框 的 功能 。 代 码 如 下 : 

void CMYD1g::OnRdd () 


CString strpath="MP3 音乐 (*.mp3) |*.mp311"; // 过 滤 文 件 列表 
CFileDialog filed(true,NULL,NULL,OFN HIDEREADONLY, strpath, NULL); 

// 创 建文 件 对 象 并 打开 
if (filed.DoModal ()==IDOK) // 显 示 文 件 打开 对 话 框 
站 

// 省 略 部 分 代码 


在 VC 中 运行 上 面 的 代码 以 后 ， 用 户 在 界面 中 单 击 “ 添 加 歌曲 ”按钮 ， 便 会 弹出 一 个 
“打开 ”对 话 框 ， 如 图 9.24 所 示 。 


- 可 不 可 以 - 演唱 会 版 sp3 


- 来 生 绊 .mp3 
- 浪人 情歌 - 图 sp3 
- 练习 .ap3 


文件 类 型 0): iF3 圭 乐 ( m5) |] 了 


图 9.24 “打开 ”对 话 框 


如 果 用 户 在 “打开 ”对 话 框 中 选择 需要 添加 的 歌曲 后 ， 程 序 会 在 播放 列表 中 添加 相应 
的 文件 相关 信息 ， 并 且 程 序 会 向 “歌曲 列表 ”文件 中 写 入 该 歌曲 文件 的 这 些 信息 。 这 样 程 
序 在 读 取 时 ， 在 列表 控件 中 会 显示 这 些 默 认 的 歌曲 列表 。 

首先 ， 用 户 需 要 创建 两 个 文件 对 象 并 分 别 关联 “歌曲 列表 ”文件 以 及 用 户 通 过 “文件 
打开 ”对 话 框 所 选择 的 文件 。 然后， 用 户 从 选择 的 MP3 文件 中 读 取 相关 信息 到 结构 体 变量 
MP3 中 ， 再 将 该 变量 中 的 全 部 内 容 写 入 “歌曲 列表 ”文件 中 存储 。 代 码 如 下 : 


a // 省 略 部 分 代码 

CFile filel(" 歌 曲 列表 .1w",CFile::modeReadWrite) ;// 创 建文 件 对 象 并 关联 该 文件 
POSITION pt=filed.GetStartPosition(); // 获 取 用 户 选择 的 文件 路 径 
CString path=filed.GetNextPathName (Pt) 7 

CFile file(path,CEFile::modeReadWrite) 7 // 创 建文 件 对 象 并 关联 该 文件 
file.Seek(-128,CFile::end); // 从 文件 结尾 处 移动 文件 指针 
file.Read (gmp3,128); // 读 取 文件 内 容 
file.cClose(); // 关 闭 文件 

strcpy (&mpd.title[0], gmp3.title[0]); // 复 制 各 个 结构 体 成 员 变 量 
strcpy (&mpd.arti[0], &mp3.arti[0]); 

strcpy (&mpd.heade [0], &mp3.heade [0]); 

if (mpd.heade && "TAG") // 判 断 是 否 为 MP3 文件 
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省 
CString str="MP3"; 
strcpy (&mpd.heade[0], str.GetBuffer (1)); 
mpd. str=path; // 获 取 MP3 文件 的 路 径 
filel.Seek(2,CFile::end); 
filel .Write (gmpd, sizeof (mp3)); // 将 结构 体 数据 写 入 列表 文件 中 
filel.Flush(); // 强 制 写 入 数据 
} 
filel.Close(); // 关 闭 文件 
ee // 省 略 部 分 代码 


通过 以 上 代码 , 用 户 实现 了 将 歌曲 文件 的 标题 以 及 该 文件 路 径 等 信息 写 入 “歌曲 列表 ” 
文件 中 进行 存储 。 待 实例 程序 启动 时 会 对 该 文件 进行 读 取 ， 并 将 这 些 歌曲 信息 显示 到 列表 
控件 中 。 

最 后 , 用 户 还 必须 将 刚 选择 的 MP3 文件 的 相关 信息 显示 在 当前 播放 列表 的 最 后 , 表示 
该 MP3 文件 是 用 户 最 近 添加 到 程序 中 的 。 代 码 如 下 : 


Re // 省 略 部 分 代码 
int nRow = m 1ist.InsertItem(m 1ist.GetItemCount ()+1,mp3.title)7 
// 插 入 行 
m list.SetItemText (nRow,1,mp3.arti); // 设 置 数据 
if (mp3.heade && "TAG") // 判 断 文 件 是 否 为 MP3 文件 
L 
CString mp3="MP3"; 
m list.SetItemText (DRow,2,mp3) 7 // 设 置 数 据 


} 
在 上 面 的 程序 中 , 用 户 将 再 一 次 判断 所 添加 的 文件 是 否 为 MP3 文件 。 如 果 是 ， 则 在 播 


放 列表 中 的 歌曲 类 型 中 显示 字符 串 MP3。 否 则 ， 实 例 程序 将 不 对 该 文件 做 任何 处 理 ， 如 图 
9.25 所 示 。 
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图 9.25 将 添加 的 MP3 文件 信息 显示 到 播放 列表 中 
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用 户 保 存 MP3 数据 主要 是 遵循 自 定义 结构 体 mp3data 的 成 员 定 义 顺序 进行 存储 的 , 因 
为 程序 在 启动 的 时 候 是 按照 该 结构 体 进行 数据 读 取 操作 。 当 用 户 保存 数据 时 ， 如 果 没 有 遵 
循 这 个 规律 ， 则 程序 读 取 数据 将 发 生 错 误 。 


9.6.3 ”识别 数据 文件 信息 


识别 数据 文件 信息 主要 是 指 用 户 对 MP3 数据 格式 的 识别 。 在 本 章 9.1 节 中 向 用 户 介绍 
了 MP3 文件 的 标签 帧 位 于 该 文件 的 最 后 128 字 节 , 并 且 列 出 了 其 中 主要 的 数据 成 员 。 其 中 ， 
MP3 标签 帧 是 以 字符 串 TAG 开头 。 然 后 ， 该 文件 的 其 他 信息 都 是 以 一 定 的 顺序 进行 排列 ， 
以 便 用 户 进行 读 取 与 保存 。 其 定义 顺序 的 代码 如 下 : 


typdef struct mp3 struct // 自 定义 MP3 结构 体 
char heade[3]; //TAG 字符 标记 
char title[30]; // 音 乐 文件 名 称 
char arti [30]; // 演 唱 者 

char alb [30]; // 专 辑 

char year[4]; // 出 版 年 份 

char text[28]; // 备 注 内 容 

char reser; // 保 留 

char tra; // 音 轨 

char genr; // 文 件 类 型 


} mp3struct; 

用 户 在 实际 编程 时 ， 便 可 以 按照 这 个 结构 所 定义 的 顺序 对 MP3 数据 进行 读 取 和 保存 。 
其 中 ， 最 后 3 个 成 员 变量 在 9.1 节 中 并 未 介绍 。 原 因 是 这 3 个 成 员 变 量 在 实际 编程 时 很 少 
使 用 ， 一 般 都 设置 为 0。 例如 ， 当 用 户 需要 判断 所 操作 的 文件 是 不 是 MP3 文件 时 ， 只 需要 
判断 该 文件 的 标签 帧 中 的 第 一 个 成 员 变 量 heade 即 可 。 如 果 该 成 员 是 字符 串 “TAG”， 则 
该 文件 是 MP3 文件 。 否 则 ， 该 文件 不 是 MP3 文件 。 


9.6.4 ”播放 控制 


在 本 节 中 , 将 编写 详细 而 完整 的 代码 向 用 户 讲解 各 个 功能 控件 的 具体 实现 方法 。 例 如 ， 
播放 、 停 止 以 及 暂停 等 功能 。 
1. 实现 播放 功能 


用 户 需要 通过 播放 按钮 播放 音乐 。 所 以 , 用 户 应 该 获取 当前 列表 中 被 选择 的 MP3 文件 
的 路 径 ， 并 且 根据 该 文件 路 径 调用 MCI 函数 进行 播放 。 代 码 如 下 : 


void CMVYD1g::OnPlay() // 播 放 按钮 消息 响应 函数 
{ 

MCI_OPEN PARMS open={0}; // 定 义 并 初始 化 结构 体 
char strl[100]7 // 定 义 字符 数组 
POSITION pos=m list.GetFirstSelectedItemPosition();// 获 取 用 户 选 择 的 位 置 
if (pos==NULL) // 如 果 选 择 为 空 

{ 


MessageBox (" 当 前 没有 选择 ! ") 


"2s 


第 2 篇 Visual C++ 网 络 编程 典型 应 用 


else // 如 果 选 择 不 为 空 
下 

int nItem=m list.GetNextSelectedItem(pos);// 获 取 列 表 中 当前 的 选择 项 
CString str=m list.GetItemText (nItem, 3); // 获 取 当 前 选择 项 的 文字 
open.lpstrElementName=str; // 指 定 播放 文件 路 径 
open.lpstrDeviceType="mpegvideo"; // 指 定 播放 设备 
DWORD err; // 定 义 错误 信息 
err=mciSendCommand (0, MCI OPEN,MCI OPEN TYPE|IMCI OPEN ELEMENTIMCI WRIT, ( 
DWORD) (LPVOID) gopen) ; // 初 始 化 音频 设备 
if (err==0) // 如 果 初 始 化 设备 成 功 
{ 
MCI PLAY PARMS play; // 定 义 结构 体 变量 
play.dwFrom=0; // 指 定 播放 位 置 为 起 始 位 置 
play.dwCallback=NULL; // 返 回 消息 的 窗口 句柄 为 NULL 
mciSendCommand (open.wDeviceID,MCI_PLRAY,0,，(DWORD) gplay); 

// 播 放 指定 文件 

} 
else // 初 始 化 失败 


{ 
mciGetErrorString (err, (LPSTR) strl,100) 7 // 获 取 失 败 信息 
MessageBox (str1); // 显 示 失 败 信息 
} 
} 
在 代码 中 ， 用 户 首先 通过 调用 列表 控件 的 相关 成 员 函 数 获取 当前 列表 中 被 选择 列表 
项 ， 并 从 该 项 中 获取 指定 列 的 文件 路 径 信 息 。 然 后 ， 将 该 文件 路 径 字 符 串 赋值 给 结构 体 
MCI_OPEN_PARMS 变量 的 相关 成 员 即 可 。 最 后 , 调用 MCI 函数 对 该 MP3 文件 进行 播放 。 


2. 添加 歌曲 


用 户 可 以 通过 界面 中 的 添加 歌曲 按钮 , 将 相应 的 MP3 文件 添加 到 列表 中 和 列表 文件 中 
进行 保存 。 这 样 ， 当 程序 启动 时 ， 可 以 将 用 户 已 经 添加 的 音乐 列表 全 部 显示 出 来 ， 还 可 以 
将 用 户 刚 选择 的 MP3 文件 信息 显示 到 列表 中 。 代 码 如 下 : 


CString strpath="MP3 音乐 (*.mp3) 1*.mp311"7 // 过 滤 文 件 列表 
CFileDialog filed (true,NULL,NULL,OFN HIDEREADONLY, strpath, NULL); 

// 创 建文 件 对 象 并 打开 
if (filed.DoModal ()==IDOK) // 显 示 文 件 打开 对 话 框 
| 
CFile filel ("歌曲 列表 .lw", CFile: :modeReadWrite);// 创 建文 件 对 象 并 关联 该 文件 
POSITION pt=filed.GetStartPosition(); // 获 取 用 户 选择 的 文件 路 径 
Cstring path=filed.GetNextPathName (pt); 
CFile file(path,CFile::modeReadWrite); // 创 建文 件 对 象 并 关联 该 文件 
file.Seek(-128,CFile: :end); // 从 文件 结尾 处 移动 文件 指针 
file.Read(&mp3,128) // 读 取 文件 内 容 
file.Close(); // 关 闭 文件 
strcpy (&mpd.title[0], gmp3.title[0]); // 复 制 各 个 结构 体 成 员 变量 


strcpy (&mpd.arti[0], &mp3.arti[0]); 

strcpy (&mpd.heade [0], gmp3.heade [0]); 

if (mpd.heade && "TAG") // 判 断 是 否 为 MP3 文件 
CString str="MP3"; 
strcpy (&mpd.heade[0],str.GetBuffer (1)); 
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mpd. str=path; // 获 取 MP3 文件 的 路 径 
filel.Seek(2,CFile::end); 
filel.Write (gmpd, sizeof (mp3)); // 将 结构 体 数据 写 入 列表 文件 中 
filel.Flush(); // 强 制 写 入 数据 
} 
filel.Close(); // 关 闭 文件 
int nRow = m list.InsertItem(m list.GetItemCount ()+1,mp3.title);// 插 入 行 
m list.SetItemText (nRow,1,mp3.arti); // 设 置 数据 
if (mp3.heade g&& "TAG") // 判 断 文件 是 否 为 MP3 文件 


Cstring mp3="MP3"; 

m 1ist.SetItemText (nRow,2,mp3); // 设 置 数据 

} 

该 按钮 的 功能 是 将 用 户 所 选择 的 MP3 文件 保存 在 列表 和 列表 文件 中 。 首先 , 用 户 单 击 
“添加 歌曲 ”按钮 后 ， 程 序 会 弹出 一 个 “打开 ”对 话 框 。 该 对 话 框 根据 用 户 的 选择 会 返回 
相应 的 文件 路 径 等 相关 信息 。 

然后 ， 用 户 可 以 根据 所 选择 的 文件 路 径 调用 CFile 类 的 相关 函数 创建 相应 的 文件 对 象 
并 对 其 进行 读 取 操作 。 如 果 用 户 操作 成 功 , 则 在 列表 和 列表 文件 中 写 入 读 取 到 的 MP3 数据 
即 可 。 


3. 更 换 播放 歌曲 


如 果 用 户 需要 更 换 所 播放 的 歌曲 ， 可 以 通过 单 击 “ 上 一 首 ”、“ 下 一 首 ”按钮 或 者 双 
击 播放 列表 中 需要 播放 的 歌曲 ， 即 可 实现 该 功能 。 在 本 节 中 ， 将 向 用 户 介绍 这 几 个 功能 的 
具体 实现 方法 。 

首先 ， 用 户 可 以 通过 单 击 “ 上 一 首 ” 和 “下 一 首 ” 按 钮 更 换 当 前 播放 的 歌曲 。 用 户 在 
实际 编程 中 ， 这 一 功能 均 是 根据 前 面 小 节 中 所 定义 的 全 局 变量 index 的 改变 而 实现 的 。 代 
码 如 下 : 


void CMyD1g::OnPre() // 上 一 首 按钮 消息 响应 函数 

{ 

Cstring str; // 定 义 字符 串 变量 ， 用 于 获取 播放 路 径 
str=m list.GetItemText (index-1,3) 7 // 获 取 播 放 列表 中 当前 选项 的 前 一 项 
if (open.wDeviceID) // 判 断 MCI 设备 ID 是 否 存 在 


{ 
mciSendCommand (open .wDeviceID,MCI_CLOSE, 0,0);// 车 存在 ， 则 调用 函数 关闭 


open.lpstrElementName=str; // 若 不 存在 ， 则 赋予 用 户 获取 的 播放 路 径 
open.lpstrDeviceType="mpegvideo"; // 指 定 MCI 设备 类 型 
err=mciSendCommand (0, MCI OPEN,MCI OPEN TYPE1MCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); // 打 开 并 初始 化 设备 
if (err==0) // 若 没有 发 生 设备 初始 化 失败 
{ 
MCI PLAY PARMS play; // 定 义 播放 结构 体 变 量 
mciSendCommand (open .wDeviceID,MCI PLAY,O0, (DWORD) gplay); 

// 调 用 函数 播放 指定 的 MP3 文件 
} 
} 
void CMYD1g: :OnNext () // 下 一 首 按钮 消息 响应 函数 
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Cstring str; // 定 义 字符 串 变 量 
str=m 1ist.GetItemText (index+1,3);// 获 取 当 前 播放 列表 的 下 一 项 的 播放 路 径 
if (open.wDeviceID) // 判 断 MCI 设备 ID 是 否 存 在 
{ 


mciSendCommand (open .wDeviceID,MCI CLOSE, 0,0);// 若 存在 ， 则 关闭 指定 MCI 设备 
} 
open.lpstrElementName=str; // 车 不 存在 ， 则 赋予 新 获取 的 播放 路 径 
open.1lpstrDeviceType="mpegvideo"; // 指 定 MCI 播放 设备 ID 
err=mciSendCommand (0, MCT OPEN, MCI OPEN TYPE1MCI OPEN ELEMENT|MCI WAIT, ( 


DWORD) (LPVOID) &open); // 调 用 函数 打开 并 初始 化 MCI 设备 
if (err==0) // 若 没有 发 生 错 误 ， 则 播放 指定 MP3 文件 
{ 
MCI_PLAY PARMS play; // 定 义 MCI 播放 结构 体 变量 
mciSendCommand (open .wDeviceID,MCI PLAY,O0, (DWORD) gplay); 

// 调 用 函数 打开 指定 的 MCI 设备 播放 MP3 


L 
} 


在 代码 中 ， 分 别 实现 了 上 一 首 和 下 一 首 按钮 的 消息 响应 函数 。 其 中 ， 在 上 一 首 按钮 的 
消息 响应 函数 中 是 将 全 局 变量 index 减 去 1。 以 便 用 户 获取 播放 列表 中 对 应 项 的 播放 文件 路 
径 ， 再 以 该 文件 路 径 为 参数 调用 相关 的 MCI 函数 播放 该 MP3 文件 即 可 。 而 在 下 一 首 按钮 
的 消息 响应 函数 中 是 将 全 局 变量 index 加 1, 其 他 实现 方法 均 与 上 一 首 按钮 的 消息 响应 函数 
实现 方法 一 样 。 

然后 , 用 户 也 可 以 通过 在 播放 列表 中 双击 对 应 的 MP3 文件 名 , 实现 更 换 播放 歌曲 的 功 
能 。 代 码 如 下 : 

void CMyD1g: :OnDblclkList2 (NMHDR* pNMHDR, LRESULT* pResult) 

t 


Cstring str; // 定 义 字符 串 变量 
POSITION pos=m list.GetFirstSelectedItemPosition(); 
// 获 取 用 户 当前 选择 的 列表 项 位 置 

if (pos==NULL) // 判 断 选 择 的 位 置 是 否 为 空 

MessageBox (" 用 户 双击 的 位 置 错误 或 该 列表 为 空 ! 〈 用 户 双 击 位 置 应 该 为 每 行 第 一 列 ) ") ; 
} 
else // 若 不 为 空 
{ 
int nItem=m list.GetNextSelectedItem(pos); // 获 取 用 户 选择 的 列表 项 索引 
index=nItem; // 将 该 索引 值 赋 给 全 局 变量 
index 
str=m list.GetItemText (nItem, 3); // 获 取 指 定 列表 项 的 MP3 文 件 路 径 
if (open.wDeviceID) // 判 断 MCI 设备 ID 是 否 存 在 
' 

mciSendCommand (open .wDeviceID,MCI_CLOSE, 0,0);// 若 存在 ， 则 关闭 该 MCI 设备 
|; 
open.lpstrElementName=str; // 保 存 获取 到 的 MP3 文件 路 径 
open.lpstrDeviceType="mpegvideo"; // 指 定 MP3 播放 设备 类 型 
err=mciSendCommand (0, MCI_ OPEN,MCI OPEN TYPE|IMCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); // 打 开 并 初始 化 MCI 设备 
if (err==0) // 若 没有 发 生 任何 错误 
由 
MCI_PLAY PARMS play; // 定 义 MCI 播放 结构 体 变量 
mciSendCommand (open .wDeviceID,MCI PLAY,O0, (DWORD) gplay); 
// 播 放 指定 MP3 文件 
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} 
' 
} 


4. 实现 暂停 播放 


与 其 他 播放 器 一 样 ， 本 实例 中 所 示 的 播放 器 程序 也 具有 和 暂停 播放 和 继续 播放 功能 。 本 
节 中 ， 将 这 两 个 功能 放 到 同一 个 函数 中 实现 ， 即 暂停 按钮 的 消息 响应 函数 OnZanting0 中 进 
行 实现 。 

在 实例 程序 中 ， 暂 停 播放 和 恢复 播放 功能 的 实现 原理 是 当 用 户 单 击 该 按钮 时 ， 会 将 变 
量 n 赋值 为 1 表示 用 户 暂 停 该 文件 的 播放 ， 并 且 调 用 函数 mciSendCommandO 实 现 暂停 功 
能 。 而 当 用 户 再 次 单 击 该 按钮 时 ， 程 序 会 将 年 龄 n 赋值 为 0 表示 用 户 继续 播放 ， 并 且 调 用 
MCI 函数 恢复 被 暂停 的 播放 功能 。 代 码 如 下 : 


void CMyD1g: :OnZanting() 
{ 


CString str; 
GetDlgItem(IDC ZANTING)->GetWindowText (str); 
if (n==0) 

{ 


mciSendCommand (open.wDeviceID,MCI PAUSE,0,0); 

// 向 设备 发 送 暂 停 命令 
GetDlgItem(IDC ZANTING) ->SetWindowText ("继续 "); 
n=ly 


else 


mciSendCommand (open .wDeviceID,MCI RESUME,0,0); 

// 向 设备 发 送 继续 播放 命令 
GetDlgItem(IDC_ ZANTING) ->SetWindowText ("暂停 "); 
n=0; 


} 


用 户 将 上 面 的 程序 编译 、 运 行 之 后 可 以 看 到 这 些 代码 的 实际 运行 状态 。 程 序 运行 时 ， 
用 户 单 击 “ 暂 停 ”按钮 ， 如 图 9.26 所 示 。 


| Ws | St| 上 - 首 | T-s| wmmg | 
本 


图 9.26 ”用户 暂停 播放 功能 


we 
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当 用 户 单 击 “ 和 暂停 ”按钮 时 ， 会 看 到 该 按钮 上 的 文字 会 被 修改 为 继续 ， 同 时 正在 播放 
中 的 MP3 歌曲 也 会 被 暂停 播放 。 当 用 户 再 次 单 击 该 按钮 时 ， 被 暂停 播放 的 MP3 文件 又 会 
重新 播放 ， 并 且 程 序 会 将 该 按钮 上 的 文字 修改 为 暂停 ， 如 图 9.27 所 示 。 


图 9.27 用 户 继续 播放 歌曲 


在 实例 程序 中 , 用 户 可 以 通过 单 击 “ 暂 停 ” 按钮 实现 MP3 文件 的 播放 状态 与 暂停 状态 
的 相互 切换 功能 。 但 是 ， 这 种 切换 仅仅 局 限于 同一 个 MP3 文件 。 


5. 实现 停止 播放 功能 


在 实例 程序 中 ， 用 户 还 应 该 为 其 添加 停止 功能 ， 用 于 停止 播放 当前 所 播放 的 歌曲 。 首 
先 ， 用 户 需要 为 实例 界面 中 的 “停止 ”按钮 添加 相应 的 消息 响应 函数 OnStop0。 然 后 ， 在 
该 函数 中 调用 函数 mciSendCommandO 向 当前 MCI 设备 设置 停止 指令 标志 MCI STOP。 代 
码 如 下 : 

void CMyD1g: :Onstop() 

{ 


mciSendCommand (open.wDeviceID,MCI_STOP, 0,0);// 向 当前 MCI 设备 设置 指令 标志 
index+=17 // 当 前 列表 项 加 1 


在 程序 中 ， 用 户 首先 调用 函数 mciSendCommand0 向 当前 MCI 设备 发 送 了 指令 标志 
MCI_STOP， 表 示 停 止 当 前 所 播放 的 MP3 文件 。 用 户 运行 程序 ， 结 果 如 图 9.28 所 示 。 

当 用 户 单 击 “ 停 止 ”按钮 以 后 ， 实 例 程序 会 停止 当前 所 播放 的 曲目 ， 并 且 将 播放 列表 
的 索引 加 1 指向 下 一 个 曲目 索引 。 这 样 ， 当 用 户 重新 播放 曲目 时 ， 实 例 程序 所 播放 的 应 该 
是 用 户 所 停止 的 曲目 的 下 一 个 曲目 。 例如 , 在 图 9.28 中 , 当 用 户 停止 播放 后 ， 再 次 单 击 “ 播 
放 ” 按 钮 时 ， 实 例 程序 会 播放 下 一 个 曲目 ， 也 就 是 列表 中 的 第 二 个 “ 心 蓝 ”。 
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图 9.28 用 户 停止 当前 播放 曲目 


在 实例 程序 中 ， 所 有 的 播放 控制 功能 已 经 基本 实现 。 请 用 户 结合 随 书 光盘 中 相应 章节 
的 代码 与 运行 实例 进行 学 习 。 在 9.7 节 中 ， 将 向 用 户 介绍 通过 搜索 MP3 文件 的 方法 向 播放 
列表 中 添加 曲目 。 


9.7 实现 搜索 功能 


一 般 情况 下 ， 为 了 方便 用 户 的 使 用 ， 播 放 器 都 应 该 具有 搜索 相应 文件 的 功能 。 因 此 ， 
在 该 实例 中 , 也 需要 为 用 户 添加 搜索 功能 。 本 实例 中 的 搜索 功能 分 为 “本 目录 搜索 ”和 “本 
地 搜索 ”两 种 。 其 中 ， 前 者 主要 是 在 播放 器 所 在 的 目录 下 搜索 MP3 文件 ， 而 后 者 则 是 在 所 
有 盘 符 上 搜索 MP3 文件 。 如 果 搜索 成 功 ， 则 程序 会 将 这 些 MP3 文件 添加 到 播放 列表 中 ， 
并 且 将 其 主要 信息 写 入 相应 的 文件 中 保存 。 


9.7.1 相关 类 和 函数 说 明 
在 VC 中 ,用 户 可 以 调用 MFC 类 CFileFind 的 相关 成 员 函 数 或 者 API 函数 FindFirstFile() 
和 FindNextFile0 实 现 文件 搜索 功能 。 
1. CFileFind 类 实现 搜索 功能 
CFileFind 类 是 MFC 中 封装 的 关于 文件 搜索 的 相关 类 。 其 构造 函数 原型 如 下 : 
CFileFind(); 


该 函数 的 作用 是 创建 一 个 CFileFind 类 的 实例 对 象 - 例 如 , 用户 在 程序 中 创建 CFileFind 
类 对 象 ， 代 码 如 下 : 
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局 // 省 略 部 分 代码 

CFileFind findfile; // 创 建文 件 搜索 对 象 

如 果 文 件 搜索 对 象 创建 成 功 ， 则 用 户 可 以 调用 其 成 员 函 数 实现 相应 的 功能 。 其 中 ， 函 
数 FindFile0 和 FindNextFile0 是 该 类 中 非常 重要 的 两 个 函数 。 原 型 分 别 如 下 : 

Virtual BOOL FindFile( LPCTSTR pstrName = NULL, DWORD dwUnused =0) 

Virtual BOOL FindNextFile(); 

如 果 函 数 FindFile0 执 行 成 功 ， 则 返回 非 0 值 。 否 则 ， 函 数 将 返回 0， 表示 执行 失败 。 
其 参数 pstName 表示 需要 搜索 的 文件 名 ， 如 果 该 参数 为 NULL， 则 表示 搜索 所 有 文件 。 参 
数 dwUnused 必须 设置 为 0。 例如 ， 用 户 使 用 这 个 函数 搜索 所 有 的 MP3 文件 ， 代 码 如 下 : 


区 // 省 略 部 分 代码 
CFileFind findfile; // 创 建文 件 搜索 对 象 
findfile. FindFile("*.mp3",0); // 搜 索 MP3 文件 
// 省 略 部 分 代码 


函数 FindNextFile0 表 示 搜 索 下 一 个 文件 。 该 函数 必须 与 FindFile0 一 起 使 用 。 和 否则 ， 
户 将 不 能 实现 文件 搜索 功能 。 代 码 如 下 : 


// 省 略 部 分 代码 
CFileFind findfile; 


Cstring str; // 定 义 字符 串 对 象 
if(findfile.FindFile("F:\\ 音 乐 \\11\N*-*nv0)) // 搜 索 所 有 文件 
{ 


while (findfile.FindNextFile()) // 循 环 搜索 文件 
{ 
Str+=" 文 件 路 径 : "7 // 格 式 化 字符 串 对 象 
str+=findfile.GetFilePath(); // 获 取 文 件 路 径 
MessageBox (str); // 显 示 信息 
str=" "7 
}} 
A // 省 略 部 分 代码 


将 上 面 的 成 功 程序 运行 之 后 ， 用 户 单 击 “ 搜 索 目录 歌曲 ”按钮 后 ， 程 序 会 不 停 地 显示 
搜索 到 的 文件 路 径 ， 如 图 9.29 所 示 。 
当 用 户 搜索 到 相应 的 文件 后 ， 可 以 调用 CFilefind 类 的 其 他 函数 获取 文件 的 相关 信息 。 


全 注意 : 由 于 本 章 中 实现 搜索 功能 主要 是 使 用 API 函数 ， 所 以 ， 对 CFilefind 类 的 讲解 较 
为 简略 。 


2. API 函 数 实现 搜索 功能 


用 户 使 用 API 函数 实现 搜索 功能 时 ,需要 使 用 到 两 个 API 函数 ,分别 是 FindFirstFileO 
和 FindNextFile0。 这 两 个 函数 的 功能 与 CFileFind 类 中 的 成 员 函 数 FindFile0 和 FindNextFile0 
的 功能 相对 应 。 函 数 原型 如 下 : 
HANDLE FindFirstFile( 
LPCTSTR lpFileName, 
LPWIN32 FIND DATA lpFindFileData 
) 
BOOL FindNextEile( 
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HANDLE hrFindFile, 
LPWIN32 FIND DATA lpFindFileData 
) 


04:03/00:30 
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图 9.29 搜索 文件 并 获取 其 路 径 


其 中 ， 函 数 FindFirstFile0 作 用 是 搜索 文件 并 返回 搜索 句柄 。 如 果 执行 成 功 ， 则 函数 返 
回 文件 搜索 的 句柄 。 和 否则 ， 函 数 将 返回 NULL。 其 参数 jpFileName 表示 搜索 的 文件 名 。 参 
数 IpFindFileData 是 指向 结构 体 WIN32_FIND_DATA 的 指针 。 该 结构 体 定义 如 下 : 
typedef struct WIN32_ FIND DATA { 


DWORD dwFileAttributes; 
FILETIME ftCreationTime; 


FILETIME ftLastAccessTime; 


FILETIME ftLastWriteTime; 


TCHAR CcFileName[ MAX PATH ]; 


TCHAR cAlternateFileName[ 14 ]; 


} WIN32_FIND DATA; 


// 文 件 属性 

// 文 件 创建 时 间 

// 文 件 最 后 访问 时 间 

// 文 件 最 后 保存 时 间 

// 省 略 部 分 不 常用 的 成 员 变量 
// 文 件 路 径 

// 文 件 名 


函数 FindNextFile0 的 作用 是 继续 搜索 指定 文件 ， 并 将 文件 的 相关 信息 保存 到 结构 体 
WIN32_ FIND _ DATA 中。 其 参数 hFindFile 是 函数 FindFirstFile() 执 行 成 功 后 所 返回 的 文件 


搜索 句柄 。 


例如 ， 用 户 使 用 这 两 个 API 函数 进行 搜索 MP3 文件 。 代 码 如 下 


WIN32_FIND DATA data; 
BOOL boo; 


// 省 略 部 分 代码 
// 定 义 结构 体 变量 
// 定 义 布尔 变量 


HANDLE file=:: FindFirstFile("F:\*.mp3", &data);// 返 回 文件 搜索 句柄 


if (file!=NULL) 
{ 


dof 
CString str=" 文 件 路 径 : "7 


str+=(CString)data. cFileName; 


// 定 义 字符 串 对 象 
// 获 取 文 件 路 径 
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int nRow=m list-InsertItem(m list.GetItemCount ()+1,mp.mp3.title);// 插 入 行 
m list.SetItemText (nRow,1,mp.mp3.arti); // 设 置 数 据 
if(mp.mp3.heade && "TAG") 
{ 

Cstring mp3="MP3"7 
m list.SetItemText (nRow, 2,mp3); // 设 置 数据 


} 

m list.SetItemText (nRow, 3, str); 

boo=:: FindNextFile (file, gdata); // 查 找 下 一 个 文件 
jwhile (boo); 

} 


上 面 的 程序 搜索 到 指定 文件 后 ， 便 将 该 文件 添加 到 播放 列表 中 存储 ， 如 图 9.30 所 示 。 
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图 9.30 ”添加 搜索 到 的 文件 到 播放 列表 中 

当 用 户 搜 索 完 所 有 文件 以 后 ， 需 要 调用 函数 FindClose0 关 闭 文 件 搜索 句柄 。 函 数 原 型 
如 下 : 

BOOL FindClosel( 

HANDLE hFindFile 

Ym 

参数 hFindFile 表示 关闭 的 文件 搜索 句柄 。 例 如 , 用 户 将 前 面 搜索 文件 的 句柄 file 关闭 ， 
代码 如 下 : 

本 // 省 略 部 分 代码 

::FindClose (file) // 关 闭 文 件 搜索 句柄 

在 本 节 中 ， 主 要 向 用 户 介绍 了 文件 搜索 的 基本 实现 方法 以 及 实现 该 方法 所 要 使 用 的 
MFC 类 或 API 函数 。 


9.7.2 ”搜索 本 目录 文件 


在 本 节 中 ,主要 向 用 户 讲述 使 用 MFC 类 或 API 函数 , 在 播放 器 所 在 的 目录 下 搜索 MP3 
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文件 的 具体 编程 方法 。 
1. 使 用 MFC 类 搜索 目录 文件 


下 面 用 户 使 用 MFC 类 CFileFind 搜索 播放 器 所 在 目录 中 的 所 有 MP3 文件 。 具 体 代码 
如 下 : 


a // 省 略 部 分 代码 

CFileFind findfile; // 创 建文 件 搜索 对 象 
Cstring str2; 

findfile.FindFile("F:\\ 音 乐 \\11\\*.mp3",0); // 搜 索 目录 中 的 MP3 文 件 

while(findfile.FindNextFile()) 

了 


str2=findfile.GetFilePath(); // 获 取 文 件 路 径 

CFile filel(str2,CFile::modeRead); / /创建 文件 对 象 

file.Seek(-128,CFile::end); // 从 文件 结尾 移动 指针 

file.Read (gmp.mp3,128); // 读 取 文 件 

file.Close() 7 // 关 闭 文件 

int nRow=m list.InsertItem(m list.GetItemCount()+1,mp.mp3.title); 
// 在 列表 中 插入 行 


m 1ist.SetItemText (nRow,1,mp.mp3.arti); // 设 置 数据 
if(mp.mp3.heade && "TAG") 


CString mp3="MP3"; 
m list.SetItemText (nRow, 2,mp3); // 设 置 数据 
} 
m list.SetItemText (nRow, 3, str2); 
mp.str[0]=str2.GetBuffer (0); 
mp.mp3.text [28]=0; // 赋 初 值 
mp.mp3.year[4]=0; 
mp.mp3.alb[30]=0; 
CFile filel ("歌曲 列表 .lw",CFile::modeWrite|CFile::modeNoTruncate|CFile:: 
modeCreate); 


// 关 联 列表 文件 
filel.Seek(0,CFile::end); // 定 位 文件 指针 到 结尾 
filel.Write (&mp, sizeof (mp) ); // 写 入 文件 
filel.Flush(); // 强 制 写 入 文件 
filel.Close(); // 关 闭 文件 
1 


在 程序 中 , 用 户 首先 定义 了 一 个 文件 搜索 对 象 实例 findfile。 接 着 使 用 该 对 象 调用 其 成 
员 函 数 FindFile0 对 路 径 “F 改 音乐 \11\W\*.mp3” 下 的 所 有 MP3 文件 进行 搜索 ， 并 将 搜索 的 
结构 添加 到 播放 列表 中 。 

在 VC 中 编译 并 运行 上 面 的 程序 ， 用 户 可 以 单 击 “ 搜 索 目 录 歌 曲 ” 按 钮 实现 在 本 目录 
下 搜索 所 有 的 MP3 文件 ， 如 图 9.30 所 示 。 


2. 使 用 API 函 数 搜索 目录 文件 


用 户 在 实例 程序 中 ， 除 了 可 以 使 用 MFC 类 进行 MP3 文件 的 搜索 以 外 ， 还 可 以 使 用 
API 函数 进行 。 具 体 代码 如 下 : 
// 省 略 部 分 代码 
CFileFind findfile; // 定 义 文件 查找 对 象 
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CString str2,strTmp; // 定 义 字符 串 变 量 
Cstring strpath=""; // 定 义 路 径 字 符 串 
BROWSEINFO bBinfo; // 定 义 变量 
memset (&bBinfo,0,sizeof (BROWSEINFO)); ”// 定 义 结构 并 初始 化 
bBinfo.hwndOowner=m hWnd; // 设 置 对 话 框 所 有 者 句柄 


bBinfo.1pszTitle=" 请 选择 安装 路 径 : "; // 修 改 对 话 框 标题 
bBinfo.ulFlags=BIF RETURNONLYFSDIRS; ， // 设 置 标志 只 允许 选择 目录 
LPITEMIDLIST lpDlist; // 定 义 目录 列表 变量 

lpDlist=SHBrowseForFolder (&bBinfo); // 显 示 选择 对 话 框 

if (lpDlist!=NULL) 

SHGetPathFromIDList (lpDlist, strTmp.GetBuffer (0)); 


// 把 项 目标 识 列表 转化 成 目录 
strcat (strTmp.GetBuffer (0),"\\*.mp3"); / /连接 字符 串 
findfile.FindFile(strTmp); 
if (file!=NULL) 
{ 
dof 

Cstring str; 

str=data.cFileName; // 获 取 文 件 路 径 
CFile file2(str,CFile::modeRead); // 创 建文 件 对 象 
file2.Seek(-128,CFile::end); // 定 位 文件 
file2.Read (gmp.mp3,128); // 读 取 文 件 
file2.Close(); // 关 闭 文件 


int nRow=m list.InsertItem(m list.GetItemCount ()+1,mp.mp3.title);// 插 入 行 
m list.SetItemText (nRow,1,mp.mp3.arti); // 设 置 数据 
if(mp.mp3.heade && "TAG") 
Cstring mp3="MP3"; 
m list.SetItemText (nRow, 2,mp3); // 设 置 数 据 
} 
m list.SetItemText (nRow,3, str); 
mp.mp3.text [28]=0; // 填 充 数 据 结 构 
mp.mp3.year[4]=0; 
mp.mp3.alb[30]=0; 
CFile filel ("歌曲 列表 .lw",CFile::modeWrite|lCFile: :modeNoTruncatel|lCFile:: 
modeCreate); 


// 关 联 文 件 
filel.Seek(0,CFile::end); // 定 位 文件 指针 
filel .Write (&mp, sizeof (mp) ); // 写 入 文件 
filel.Flush(); // 强 制 写 入 
filel.Close(); // 关 闭 文件 
boo=:: FindNextFile (file, &data); // 查 找 下 一 个 文件 
}while (boo); 

::FindClose (file); // 关 闭 文件 搜索 句柄 


用 户 使 用 API 函数 搜索 文件 的 原理 与 使 用 MFC 类 是 一 样 的 。 上 面 的 代码 运行 后 会 弹 
出 “浏览 文件 夹 ” 对 话 框 ， 如 图 9.31 所 示 。 

当 用 户 选 择 一 个 目录 以 后 , 程序 会 在 该 目录 中 查找 所 有 的 MP3 文件 , 并 将 这 些 文件 添 
加 到 播放 列表 中 和 写 入 文件 中 进行 保存 。 

在 本 节 中 , 分 别 向 用 户 介绍 了 使 用 MFC 类 和 API 函数 实现 搜索 所 有 MP3 文件 的 方法 
和 具体 的 代码 实现 ， 请 用 户 将 本 节 所 讲 内 容 结合 随 书 光盘 中 的 实例 代码 与 运行 结果 一 起 进 
行 学 习 。 
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图 9.31 “浏览 文件 夹 ”对话 框 


9.7.3 ”搜索 本 地 文件 


在 9.7.2 节 中 ， 用 户主 要 是 实现 在 指定 目录 中 搜索 MP3 文件 。 而 在 本 节 中 ， 将 向 用 户 
介绍 在 本 地 计算 机 中 搜索 所 有 MP3 文件 的 方法 。 实 现 本 地 搜索 所 使 用 的 方法 主要 是 使 用 
MEFC 中 的 CFileFind 类 。 

首先 ， 用 户 需要 在 程序 中 定义 一 个 字符 串 数组 ， 用 于 保存 搜索 路 径 。 代 码 如 下 : 

Cstring str[4]={"C:\\","D:\N\","E:\\","F:\\"}; // 指 定 搜索 路 径 

// 省 略 部 分 代码 

然后 ， 在 搜索 本 地 歌曲 按钮 的 消息 响应 函数 OnSousuomulu20 中 ， 添 加 相应 代码 实现 
搜索 指定 路 径 中 的 所 有 MP3 文件 。 其 搜索 原理 与 搜索 指定 目录 下 的 文件 是 一 样 的 ， 代 码 
如 下 : 


SE // 省 略 部 分 代码 

CFileFind findfile; // 创 建文 件 搜索 对 象 
Cstring str2; 

Cstring str[4]={"C:N\","D:N\","E:\\","F:\\"}; // 指 定 搜索 路 径 

findfile.FindFile("F:\\ 音 乐 \\11\\*.mp3",0); // 搜 索 目 录 中 的 MP3 文件 

for(int i=0;i<4;i++) 


{ 

str3=str[i]; 

str3+=" 音 乐 \\11\\*.mp3"; 
findfile.FindFile(str3,0); 
while (findfile.FindNextFile()) 


i 
str2=findfile.GetFilePath (); // 获 取 文件 路 径 
CFile file(str2,CFile::modeRead); // 创 建文 件 对 象 
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file.Seek(-128,CFile::end)7 // 从 文件 结尾 移动 指针 
file.Read (gmp.mp3,128); // 读 取 文 件 
file.Close(); // 关 闭 文件 
int nRow=m list.InsertItem(m list.GetItemCount()+1,mp.mp3.title); 
// 在 列表 中 插入 行 

m list.SetItemText (nRow,1,mp.mp3.arti); // 设 置 数据 
if(mp.mp3.heade && "TAG") 

CString mp3="MP3"; 
m list.SetItemText (nRow, 2,mp3); // 设 置 数据 


了 list.SetItemText (nRow,3, str2); 

mp.str[0]=str2.GetBuffer (0); 

mp.mp3.text[28]=0; // 赋 初 值 
mp.mp3.year[4]=0; 

mp.mp3.alb[30]=0; 

CFile filel ("歌曲 列表 .lw",CFile: :modeWrite|lCFile::modeNoTruncate|CFile:: 
modeCreate); 


// 关 联 列表 文件 
filel.Seek(0,CFile::end); // 定 位 文件 指针 到 结尾 
filel.Write (gmp, sizeof (mp)); // 写 入 文件 
filel.Flush(); // 强 制 写 入 文件 
filel.Close(); // 关 闭 文件 
} 


在 代码 中 ， 用 户主 要 使 用 了 循环 变换 搜索 路 径 的 方法 对 文件 进行 搜索 。 其 他 功能 实现 
与 程序 在 指定 路 径 下 搜索 的 实现 方法 一 样 。 因 此 ， 本 节 将 不 再 对 该 方法 进行 效 述 ， 有 具体 功 
能 代码 请 参考 随 书 光盘 中 的 对 应 程序 。 


9.8 小 结 


在 本 章 中 , 主要 向 用 户 讲解 从 MP3 文件 的 基本 结构 知识 到 实例 工程 的 创建 、 程序 中 各 
个 功能 的 具体 实现 方法 以 及 MCI 函数 的 用 法 等 。 用 户 通过 本 章 的 学 习 ， 不 但 能 对 MP3 格 
式 的 文件 进行 读 取 和 修改 ， 还 可 以 利用 MCI 函数 实现 MP3 文件 的 播放 功能 。 请 用 户 在 学 
习 完 本 章 后 ， 一 定 要 结合 随 书 光盘 中 的 实例 程序 进行 学 习 和 调试 程序 。 
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P2P 《peer-to-peer) 表示 网 络 中 的 对 等 传输 协议 。 一 般 情况 下 ， 用 户 在 实际 生活 中 所 
使 用 的 即时 聊天 软件 等 均 采 用 的 是 P2P 传输 模式 传输 数据 。 在 本 章 中 ， 将 主要 向 用 户 讲解 
使 用 P2P 协议 从 本 地 客户 机 传输 MP3 文件 到 另 一 个 客户 机 中 进行 播放 的 实现 过 程 以 及 
方法 。 


10.1 了 P2P 网 络 应 用 


在 网 络 中 ， 用 户 所 使 用 的 许多 软件 都 是 基于 P2P 协议 进行 开发 的 。 例 如 ， 用 户 经 常 使 
用 的 一 些 下 载 软件 ， 这 种 下 载 软件 在 下 载 的 同时 也 在 上 传 文件 。 因 此 ， 当 使 用 这 类 下 载 软 
件 的 用 户 越 多 时 ， 其 下 载 速度 就 越 快 。 在 本 节 中 ， 将 向 用 户 介绍 P2P 的 基本 概念 和 P2P 网 
络 模型 。 


10.1.1 P2P 概述 


P2P 协议 在 实际 使 用 时 ， 常 被 称 为 点 对 点 传输 协议 。 使 用 该 传输 协议 传输 数据 的 双方 
既是 服务 器 ， 又 是 客户 机 。 因 此 ， 使 用 P2P 传输 协议 传输 数据 的 速度 很 快 。 但 是 ， 由 于 使 
用 P2P 协议 进行 数据 传输 的 程序 会 对 用 户 的 计算 机 不 断 地 进行 读 取 操作 。 所 以 ， 使 用 P2P 
对 用 户 的 计算 机 有 着 一 定 的 副作用 。 

现在 ，P2P 技术 主要 被 大 量 地 运用 在 下 载 软件 等 共享 软件 中 。 因 为 使 用 P2P 技术 实现 
这 些 共享 软件 时 ， 该 软件 便 具 有 了 很 多 优点 。 

口 提高 了 资源 数据 的 利用 率 。 例 如 : 当 用 户 A 通过 P2P 软件 共享 网 络 中 的 资源 时 ， 

而 用 户 B、 用 户 C 可 以 通过 P2P 软件 从 用 户 A 的 计算 机 上 得 到 各 自 所 需要 的 数据 
资源 。 所 以 ， 用 户 使 用 P2P 软件 时 ， 所 使 用 的 用 户 越 多 ， 则 其 数据 传输 的 速度 也 
就 越 快 。 


外 注意 : 当 用 户 在 实际 编程 时 ， 实 现 这 样 的 功能 所 使 用 的 P2P 网 络 模型 是 网 状 模型 ， 该 模 
型 将 在 10.1.2 节 中 讲解 。 


口 使 用 P2P 技术 开发 的 共享 软件 均 有 共同 的 一 个 特点 ， 即 使 用 高 共享 软件 的 用 户 越 
多 ， 数 据 共享 的 数量 越 多 ， 网 络 也 就 越 稳 定 。 该 优点 是 基于 C/S 模式 通信 的 软件 
所 不 能 比拟 的 。 

口 由 于 P2P 技术 采用 对 等 网 络 技术 。 所 以 ， 使 用 P2P 进行 通信 的 双方 或 多 方 均 是 直 
接 传输 资源 数据 ， 使 其 传输 速度 加 快 。 与 C/S 模式 的 通信 软件 相 比 ，P2P 软件 减少 
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了 数据 的 中 转 。 不 但 降低 了 成 本 ， 还 使 通信 双方 缩短 了 数据 传输 所 用 的 时 间 。 

P2P 软件 的 这 些 优点 已 经 被 广泛 地 得 到 实际 应 用 。 在 日 常生 活 中 ， 用 户 经 常会 使 用 到 
这 些 类 型 的 P2P 软件 。 例 如 ，PPLive、PPS、 风 行 等 网 络 直播 软件 。 

但 是 , 这些 P2P 软件 在 方便 用 户 的 同时 , 也 给 用 户 带 来 了 许多 未 知 的 安全 威胁 。 例如 
用 户 A 可 能 在 其 共享 资源 中 添加 病毒 等 有 害 程序 。 当 用 户 B 通过 P2P 软件 共享 数据 时 , 用 
户 A 便 将 带 有 病毒 的 数据 传送 到 用 户 B 的 计算 机 中 ,导致 计算 机 中 毒 。 这 个 病毒 数据 会 被 
P2P 软件 传输 到 其 他 计算 机 上 ， 并 且 其 传播 速度 会 非常 快 ， 以 致 用 户 没有 察觉 就 已 经 中 了 
病毒 。 

P2P 软件 还 有 一 个 更 大 的 缺点 在 于 其 在 获取 其 他 计算 机 数据 的 同时 ， 也 在 为 其 他 计算 
机 提供 共享 数据 。 所 以 ，P2P 软件 会 不 停 地 在 计算 机 上 进行 读 写 操作 ， 这 样 会 对 用 户 的 计 
算 机 造成 一 定 的 损害 。 


10.1.2 ”P2P 网 络 模型 


在 10.1.1 节 中 ,已 经 向 用 户 介绍 了 P2P 软件 的 应 用 范围 以 及 其 在 实际 应 用 中 的 优 缺 点 。 
而 P2P 的 这 些 优 缺 点 也 取决 于 P2P 的 网 络 模型 。 目 前 ， 用 户 在 实际 应 用 中 ， 会 经 常 使 用 到 
的 P2P 网 络 模型 主要 为 网 状 模型 ， 本 章 实例 程序 也 将 主要 使 用 该 模型 。 所 以 ， 在 本 节 中 将 
主要 向 用 户 介绍 这 种 网 络 模型 的 相关 基础 知识 。 


1. 网 状 模型 概述 


网 状 模型 在 P2P 网 络 中 ， 是 指 该 网 络 拥有 一 台 主 计算 机 ， 而 其 他 安装 有 P2P 软件 的 计 
算 机 则 称 为 网 络 节点 。 通 常 ， 在 P2P 网 络 的 主 计算 机 中 ， 都 会 保存 有 该 网 络 中 各 个 节点 计 
算 机 的 地 址 以 及 所 拥有 的 文件 信息 等 。 

如 果 某 个 节点 计算 机 需要 某 些 文件 ， 则 该 节点 计算 机 会 向 网 络 中 的 主 计算 机 发 送 相关 
的 查询 信息 。 当 主 计算 机 接收 到 该 查询 信息 以 后 ， 则 在 节点 计算 机 列表 中 查询 包含 所 请 求 
文件 的 节点 计算 机 地 址 。 然 后 ， 主 计算 机 再 将 该 地 址 返回 给 发 送 查 询 请 求 的 节点 计算 机 。 
最 后 ， 通 过 主 计算 机 返回 的 节点 地 址 ， 两 台 节点 计算 机 会 直接 进行 连接 、 传 输 文件 。 


和 注意 : 在 P2P 网 状 模型 中 ， 主 计算 机 相当 于 一 台 查 询 服务 器 ， 并 不 真正 拥有 任何 资源 文 
件 ， 只 提供 在 该 网 络 中 所 有 节点 计算 机 的 地 址 和 相应 的 存储 文件 信息 。 因 此 ， 基 
于 网 状 模型 开发 的 P2P 软件 并 不 是 真正 意义 上 的 点 对 点 传输 软件 。 


用 户 在 实际 生活 中 ， 会 发 现 几 乎 所 有 基于 P2P 网 状 模 型 开发 的 软件 都 有 一 个 共同 点 
就 是 使 用 该 软件 的 用 户 越 多 ， 共 享 数据 的 速度 也 就 越 快 。 这 是 因为 使 用 的 用 户 越 多 ， 则 表 
示 所 共享 的 数据 也 相应 增多 。 此 时 ，P2P 软件 则 会 选择 一 个 空闲 并 且 拥有 相应 文件 的 节点 
计算 机 发 出 连接 请 求 ， 等 待 连接 成 功 后 便 开始 传输 文件 。 

P2P 网 状 模型 的 优点 是 使 每 个 网 络 节点 计算 机 根据 当前 的 网 络 状况 ， 自 由 选择 目标 计 
算 机 。 这 样 ， 不 仅 节省 了 用 户 的 带宽 ， 还 缩短 了 数据 操作 的 时 间 等 。 但 是 ， 由 于 P2P 网 状 
模型 的 通信 方式 决定 ， 在 该 网 络 模型 中 的 所 有 节点 计算 机 都 可 能 会 遭 到 病毒 文件 的 袭击 。 
因此 ， 用 户 使 用 基于 该 类 模型 开发 的 P2P 软件 时 ， 应 该 非常 小 心 ， 不 要 随意 下 载 文件 。 
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2. 网 状 模型 结构 


P2P 网 状 模型 结构 与 C/S 网 络 模型 结构 一 样 ， 也 拥有 固定 的 P2P 网 状 模型 结构 ， 如 图 
10.1 所 示 。 


主 计算 机 


图 10.1 P2P 网 状 模型 结构 


在 图 10.1 中 ， 用 户 可 以 看 到 3 个 用 户 之 间 可 以 通过 交换 机 A 和 交换 机 B 互相 进行 数 
据 传输 。 但 是 ，3 个 客户 端 必须 在 传输 数据 之 前 ， 向 主 计算 机 发 送 相关 的 信息 ， 请 求 拥有 
相应 文件 存储 的 其 他 用 户 计 算 机 地 址 。 

由 于 了 P2P 网 状 模型 的 优点 ,所 以 越 来 越 多 的 网 络 视频 直播 软件 均 开始 基于 该 模型 设计 。 
虽然 ， 在 实际 生活 中 ， 各 种 P2P 软件 的 开发 模式 多 种 多 样 。 但 是 ， 均 离 不 开 P2P 通信 的 基 
本 方法 。 

在 本 节 中 ， 主 要 向 用 户 介 绍 了 P2P 网 状 模型 的 基本 通信 方式 、P2P 网 状 模型 的 优 缺 点 
以 及 网 状 模型 的 基本 结构 。 用 户 在 学 习 本 节 基 础 知识 时 , 一 定 要 体会 其 中 的 知识 点 , 例如 ， 
P2P 网 状 模型 的 通信 方式 等 。 


10.2 界面 设计 


本 节 将 根据 前 面 所 介绍 的 关于 P2P 网 状 模型 的 通信 方式 ， 在 VC 中 编写 代码 实现 P2P 
网 络 中 的 各 节点 计算 机 相互 寻 址 ， 相 互 连 接 以 及 相互 传输 数据 等 。 


10.2.1 创建 工程 


由 于 本 章 所 讲解 的 P2P 网 络 播放 器 运行 时 ， 需 要 Windows Sockets 的 支持 。 所 以 ， 用 
户 在 创建 实例 工程 时 ， 必 须 选 择 工 程 支持 Windows Sockets 功能 。 否 则 ， 用 户 只 能 在 代码 
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中 手动 添加 该 功能 。 工 程 创建 的 基本 步骤 如 下 。 
(1) 用 户 打开 VC， 选 择 “文件 ”|“ 新 建 ”命令 ， 打 开 “ 新 建 ” 对 话 框 ， 如 图 10.2 
所 示 。 用 户 需要 在 工程 类 型 列表 中 选择 MFC AppWizard[exe] 选 项 , 表示 创建 的 工程 项 目 基 
于 MFC 应 用 程序 。 在 工程 名 称 中 修改 该 实例 工程 名 为 “P2P 网 络 播放 器 ”， 并 选择 工程 文 
件 的 存储 路 径 。 


文件 工程 | 工作 区 | 其 它 文档 | 


四 ATLCOM AppWizard 
Cluster Resource Type Wizard 
eee AppWizard 
Database Project 
| 总 DevStudio Add-in Wizard 位 置 (Oj: 
S Extended Stored Proc Wizard ICADOCUMENTS AND SETTINGS ».| 
ISAPI Extension Wizard 
J Makefile 
滞 MFC ActiveX ControlWizard 
他 MFC AppWizard [dll] 创建 新 的 工作 空间 (BR} 
C r 条 加 到 当前 工作 空间 


New Database Wizard 
人 Wuniliy Project 

Win32 Application 
ES Console Application 
[Win32 DynamicLink Library 
到 win32 Static Library 


厂 从 属于 [Dj 


10.2 “新 建 ”对 话 框 


(2) 单 击 “ 确 定 ” 按 钮 ， 进 入 工程 设置 第 二 步 ， 选 择 应 用 程序 的 类 型 为 “ 单 文档 ”， 
如 图 10.3 所 示 。 


您 要 创建 的 应 用 程序 类 型 是 : 


F 文档 着 看 体系 结构 支持 外 


您 的 资源 使 用 的 语言 是 : 
[中 文中 国 | APPWZzCHS.DLU 


< 完成 


图 10.3 选择 应 用 程序 类 型 
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各 注意 : 由 于 在 该 实例 程序 中 ， 用 户 需要 频繁 地 使 用 菜单 。 所 以 ， 用 户 在 创建 工程 时 ， 选 
择 的 应 用 程序 类 型 为 “ 单 文 档 ”。 


(3) 单 击 “ 下 一 步 ” 按 钮 ， 选 择 该 实例 工程 是 否 包含 数 据 库 ， 如 图 10.4 所 示 。 


了 5 应 用 程序 向 导 一 


您 要 包含 数据 库 吗 ? 
。 轿 

标题 文件 

个 查看 数据 库 不 使 用 文件 支持 
查看 数据 库 使 用 文件 支持 


如 果 您 要 包含 数据 库 视 图 , 就 必须 选择 数据 源 . 


< 上 一 步 完成 取消 
图 10.4 选择 是 否 包 含 数据 库 
外 注意 : 用 户 在 工程 创建 的 这 一 步 ， 可 以 修改 工程 是 否 包含 数据 库 的 支持 。 在 本 实例 中 ， 
并 不 包含 数据 库 的 支持 ， 所 以 选择 “ 否 ” 单 选 按钮 。 


(4) 单 击 “ 下 一 步 ” 按 钮 ， 为 实例 工程 选择 支持 “ActiveX 控件 ”选项 ， 如 图 10.5 
所 示 。 


JEFC 应 用 程序 向 导 - 步 苏 3 共 6 步 


您 还 要 包含 其 他 支持 吗 ? 
厂 自动 册 
FActivex 控件 四 


< 上 -和 守成 


图 10.5 选择 “ActiveX 控件 ”的 支持 


ws 
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各 注意 : 用 户 在 这 一 步 中 ， 也 可 以 为 实例 工程 同时 选择 “自动 ” 和 “ActiveX 控件 ”支持 。 
(5) 单 击 “ 下 一 步 ” 按 钮 ， 为 实例 工程 添加 Windows Sockets 网 络 功能 的 支持 ， 如 图 


10.6 所 示 。 


IFC 应 用 程序 向 导 - 步骤 4 共 6 步 


您 是 否 希 望 包含 以 下 特点 : 
末 隐藏 工具 栏 
忆 初始 化 状态 栏 
玉 打印 和 打印 预览 
厂 上 下 文 相关 帮助 
F 30 外 观 


厂 MAPI [Messaging API] 
5 Windows Sockets [(W) 


图 10.6 为 工程 选择 支持 “Windows Sockets” 


(6) 单 击 “ 下 一 步 ” 按 钮 ， 直 接 来 到 工程 设置 步骤 的 最 后 一 步 ， 修 改 文 档 视 图 类 的 
基 类 为 CFormView， 如 图 10.7 所 示 。 


(7) 上 


和 FC 应 用 程序 向 导 - 步 枝 6 共 6 步 


类 名 中 : 头 文件 四: 

cpP2Pview PzP 网 络 播放 器 View 
基 类 网 : 执行 文件 路 : 
[comview EE 
cy | 7 加 


图 10.7 修改 实例 工程 中 视图 类 的 基 类 


户 单 击 “ 完 成 ”按钮 ， 成 功 创建 实例 工程 。 这 时 ， 用 户 可 以 直接 运行 实例 程 


序 ， 看 看 工程 修改 后 的 效果 ， 如 图 10.8 所 示 。 
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文件 四 编 得 四 查看 轨 各 助 0D 
IDBa* SRS? 


图 10.8 ”实例 程序 运行 界面 


外 注意 : 用 户 在 图 10.8 中 ， 可 以 看 到 实例 运行 界面 中 ， 单 文档 的 视图 变 成 了 对 话 框 视图 。 
这 是 因为 用 户 在 创建 工程 时 ， 将 视图 类 的 基 类 名 设 为 CFormView。 


10.2.2 界面 设计 


由 于 在 本 实例 中 ， 其 应 用 程序 类 型 已 经 被 指定 为 文档 视图 类 型 了 。 所 以 ， 用 户 在 设计 
界面 时 ， 应 尽量 将 界面 设计 得 紧凑 。 否 则 ， 实 例 程序 使 用 起 来 显得 非常 分 散 ， 影 响 实例 程 
序 的 总 体 效果 。 


1. 构造 程序 界面 


用 户 从 图 10.8 中 可 以 看 到 ， 新 建 的 实例 工程 界面 中 并 没有 任何 的 功能 控件 。 用 户 为 了 
使 程序 实现 P2P 网 络 播放 器 的 功能 ， 需 要 为 该 界面 添加 相应 的 功能 控件 并 且 需 要 调整 各 个 
控件 的 大 小 以 及 位 置 达到 美化 界面 的 效果 。 用 户 添加 控件 完成 后 的 最 终 界 面 ， 如 图 10.9 
所 示 。 

二 无 标题 - P2P 网 络 播放 器 

文件 下) 蝙 辑 下 查看 帮助 们 
口中 加 | 名 记 | 名 | | 
是 否 保 存 网 络 文件 


CBE NRE | 
否 ( 合用 后 村 被 除 》 查找 网 络 文件 | 查找 本 地 文件 | 手动 控 抽 和 
Er | 


Ez 1 


图 10.9 界面 设计 效果 


vs 
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其 中 ， 各 个 控件 的 JP 以 及 作用 等 ， 如 表 10.1 所 示 。 


表 10.1 控件 ID、 属 性 以 及 作用 


控件 ID | 控件 属性 | 控件 作用 控 件 ID 控件 作用 
IDC RADIO1 | 单 选 按钮 ”| 选择 保存 网 络 文件 |IDC_KONGZHI 手动 控制 播放 
IDC RADIO2 选择 删除 网 络 文件 |IDC_LIST1 显示 播放 列表 
Pd 播放 


选择 文件 保存 的 
路 径 


IDC EDIT1 


IDC LIULAN | 按钮 停止 


DC FND | 入 和 二 和 同文 六 上 - 
DC FND3 | 按 负 ”| 于 找 术 地 文件 播放 下 一 首 


全 注意 : 关于 各 个 控件 的 实际 效果 及 其 功能 , 请 用 户 参 考 随 书 光盘 中 的 代码 和 其 运行 效果 。 


2. 初始 化 窗口 


在 本 实例 中 , 用 户 为 了 保持 程序 界面 的 美观 , 便 需 要 将 程序 窗口 设置 为 一 个 固定 大 小 。 
这 个 功能 可 以 通过 MFC 函数 或 者 通过 改变 窗口 状态 结构 体 中 的 相关 成 员 消 去 窗口 中 的 最 
大 化 和 最 小 化 按钮 。 在 实例 中 ， 将 主要 选择 后 者 向 大 家 讲解 该 功能 的 实现 方法 。 

首先 ， 在 MFC 中 ， 被 用 于 描述 窗口 状态 的 结构 体 是 CREATESTRUCT。 用 户 可 以 通 
过 改变 其 成 员 变 量 值 来 改变 窗口 的 显示 状态 等 。 其 定义 如 下 : 


typedef struct tagCREATESTRUCT 
{ 


LPVOID lpCreateParams; // 用 于 创建 窗口 的 数据 指针 
HANDLE hInstance; // 应 用 程序 实例 句柄 
HMENU hMenu; // 菜 单 句柄 

HWND hwndParent; // 指 定 父 窗口 类 

int cy; // 设 置 窗口 高 度 

int cx; // 设 置 窗口 宽度 

int y; // 指 定 窗口 显示 位 置 的 坐标 值 
nt 玉 

LONG style; // 设 置 窗口 的 样式 

LPCSTR lpszName; // 指 定 窗口 的 名 称 
LPCSTR lpszClass; // 指 定 窗口 的 类 名 

DWORD dwExstyle; // 指 定 窗口 的 扩展 样式 


} CREATESTRUCT; 
如 果 用 户 仅 仅 需 要 去 掉 最 大 化 和 最 小 化 按钮 ， 则 只 需要 使 用 到 该 结构 体 中 的 成 员 style 
即 可 。 由 于 本 实例 是 基于 文档 视图 结构 ， 所 以 ， 去 掉 最 大 化 和 最 小 化 按钮 必须 在 框架 类 
CMainFrame 的 函数 PreCreateWindow0 中 实现 。 代 码 如 下 : 
BOOL CMainFrame::PreCreateWindow (CREATESTRUCT& cs) 
if( !CEFramewnd: :PreCreateWindow(cs) ) 
return FALSE; 
cs.style &= ~WS MAXIMIZEBOX; // 去 掉 最 大 化 按钮 
cs.style &= ~WS MINIMIZEBOX; // 去 掉 最 小 化 按钮 
return TRUE; 
} 


在 代码 中 ， 符 号 “一 ”表示 逻辑 运算 中 的 反 操作 。 而 在 这 里 表示 去 掉 窗 口中 的 最 大 化 


30s 
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和 最 小 化 按钮 ， 如 图 10.10 所 示 。 


全 注意 : 


10.2.3 


状态 时 ， 一定 需要 在 该 函数 中 进行 。 


二 注意 : 您 使 用 文件 后 ， 该 文件 将 保存 到 多 所 选择 的 保存 路 征 - - - 车] 
立 件 个 编 强 三 】 查看 玫 助 人 0 
DEH “Se? 


「 是 否 保存 网 络 文件 


他 是 ( 使 用 后 继续 保存 ) 文件 保存 路 径 : | 
| El 
文件 路 径 


ET 演 昌 者。 | 歌曲 关 型 


图 10.10 去 掉 最 大 化 和 最 小 化 按钮 


设置 控件 初始 化 状态 


由 于 函数 PreCreateWindow() 是 框架 类 创建 之 前 进行 调用 。 所 以 ,用 户 在 修改 窗口 
用 户 在 实际 编程 时 ， 如 果 需 要 设置 该 窗口 的 
其 他 一 些 初始 化 状态 ， 例 如 ,窗口 大 小 等 ， 可 以 通过 调用 其 他 函数 进行 状态 设置 。 
这 些 窗口 状态 的 设置 方法 将 在 后 面 进行 讲解 。 


在 实例 程序 初始 化 时 ， 为 了 使 用 户 造成 误 操作 ， 影 响 程 序 的 运行 效率 。 所 以 ， 实 例 窗 
口 显示 时 需要 进行 初始 化 。 例 如 ， 控 件 的 状态 设置 以 及 显示 列表 控件 的 标题 等 信息 。 


1. 初始 化 列表 控件 


首先 ， 用 户 需 要 按 下 组 合 键 CtlHW， 打 开 MFC 应 用 程序 向 导 对 话 框 并 为 列表 控件 关 
联 一 个 对 应 的 控件 变量 ， 如 图 10.11 所 示 。 


Message Mps Member Variables | Auomaton | Acivex Events | Cinss ine | 


Erojecr class pame; Nom = 
JPzp 同 站 于 放 要 | lcpapnew | Fe 
C44P2P 赂 揪 攻 茵 Weweh C4IP2P 风 将 匠 放 吉 Wew cpp ee 

; we 


Member Delete Variable 


忆 壮 ] mn 


图 10.11 打开 MFC 向 导 中 的 Member Variables 选项 卡 


a 
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用 户 可 以 在 控件 列表 中 选择 操作 控件 的 ID 号 码 即 可 。 在 这 里 ， 用 户 需要 选择 的 控件 
了 D 是 IDC_LIST1， 再 单 击 Add Variables 按钮 为 刚 选择 的 控件 添加 相应 的 控件 变量 ， 如 图 
10.12 所 示 。 


Member variable name: 
m_list 


Category: 
Control ”| 


Variable type: 


CListCul 了 


Description: 
map to CListCtrl member 


10.12 ”添加 控件 变量 


用 户 在 第 一 个 编辑 框 中 输入 添加 的 控件 变量 名 m_list， 其 他 则 默认 。 单 击 OK 按钮 ， 
返回 VC 主 界面 。 用 户 可 以 在 工程 视图 类 中 看 到 刚 添加 的 列表 控件 变量 。 代 码 如 下 : 


class CP2PView : public CFormView // 视 图 类 
{ 


protected: 
CP2PView(); 
DECLARE DYNCREATE (CP2PView) 
public: 
En // 省 略 部 分 代码 
CListCtrl m list; // 列 表 控件 变量 
a 


然后 ， 在 函数 OnInitialUpdate0 中 进行 列表 控件 的 初始 化 。 代 码 如 下 : 


void CP2PView: :OnInitialUpdate() 
{ 


CFormView: :OnInitialUpdate (); // 调 用 基 类 的 函数 
LVCOLUMN 1v; // 定 义 列表 控件 的 结构 体 变量 


lv.mask=LVCF_TEXT|LVCF_FMT|LVCF_WIDTH; // 初 始 化 该 结构 体 中 的 各 个 成 员 
1v.fmt=LVCEMT CENTER; 


lv.pszText=" 歌 曲名 "; // 设 置 第 一 列 的 标题 
lv.cx=110; // 设 置 第 一 列 的 宽带 
m list.InsertColumn (0, &lv); // 插 入 第 一 列 
lv.pszText=" 演 唱 者 "; // 设 置 第 二 列 的 标题 
lv.cx=105; // 设 置 第 二 列 的 宽度 
m list.InsertColumn (1, &lv); // 插 入 第 二 列 
lv.pszText="" 歌 曲 类 型 "; 

lv.cx=100; 


m list.InsertColumn(2, &lv); 
lv.pszText=" 文 件 路 径 "; 
lv.cx=110; 

m list.InsertColumn (3, &lv); 
2 // 省 略 部 分 代码 


~ 
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在 上 面 的 代码 中 , 用 户主 要 是 使 用 了 结构 体 LVCOLUMN 的 变量 lv 对 即将 插入 的 各 列 
信息 进行 描述 。 再 通过 列表 控件 的 成 员 函 数 InsertColumn0 插 入 该 列 。 将 代码 保存 以 后 ， 进 
行 编译 运行 ， 结 果 如 图 10.13 所 示 。 


二 无 标题 - P2P 网 络 播放 器 
文件 于 编辑 于 ) 查看 WW 帮助 中 
DB SRS? 
| 是否 保存 网 络 文件 


让 是 ( 使 用 后 如 续 保存 ss 和 
人 否 ( 使 用 后 格 被 员 除 》| 查找 网 络 文件 | 查找 本 地 文件 


[RE 


10.13 ”为 列表 控件 成 功 添加 标题 


全 注意 : 函数 OnInitialUpdate0 是 视图 类 中 更 新 界面 时 所 调用 的 函数 。 所 以 ， 各 个 控件 的 
初始 化 状态 设置 都 必须 在 该 函数 中 进行 。 而 结构 体 LVCOLUMN 是 MFC 中 专门 
用 于 描述 列表 控件 中 各 列 的 相关 信息 。 


2. 初始 化 其 他 控件 


在 程序 中 ， 某 些 按钮 必须 等 到 一 定 的 时 间 才 会 被 使 用 。 所 以 ， 在 程序 初始 化 时 ， 用 户 
需要 将 这 些 按钮 禁用 。 代 码 如 下 : 

void CP2PView: :OnInitialUpdate() 

| 


CFormView: :OnInitialUpdate(); 


ES // 省 略 部 分 代码 

m radiol.SsetCheck (1); // 设 置 单 选 按钮 的 选择 状态 
GetD1gItem(IDC EDIT]1)->EnableWindow (false); // 禁 用 文件 路 径 编辑 框 
GetDlgItem(IDC LIULAN)->EnableWindow (false); // 禁 用 浏览 按钮 
GetDlgItem(IDC PLAY)->EnableWindow (false); // 禁 用 播放 按钮 
GetD1gItem (IDC STOP)->EnableWindow (false); // 禁 用 停止 按钮 
GetD1gItem(IDC PRE)->EnableWindow (false); // 禁 用 上 一 首 按钮 
GetDlgItem(IDC NEXT)->EnableWindow (false); // 禁 用 下 一 首 按钮 


代码 运行 后 ， 窗 口中 的 相应 按钮 均 处 于 被 禁用 状态 ， 如 图 10.14 所 示 。 


-a 
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-无 标题 - P2P 网 络 播放 去 


TD) YL) I 
DB RS?® 
-是 本 保存 3 文件 


个 是 ( 使 用 后 继续 保存 ) 文件 保存 路 径 : | 


[BE EE EE 7“ E77: | 


10.14 ”窗口 界面 初始 化 状态 


当 用 户 选 择 保存 文件 后 ， 文 件 保存 路 径 编 辑 框 和 浏览 按钮 会 变 为 可 用 状态 。 而 当 播 放 
列表 中 有 记录 时 ， 则 播放 、 停 止 、 上 一 首 和 下 一 首 按钮 也 会 变 为 可 用 状态 。 


10.2.4 添加 消息 响应 函数 


用 户 在 程序 中 需要 实现 真正 的 功能 ， 必 须 首 先 为 各 个 控件 添加 相应 的 消息 响应 函数 。 
然后 ， 在 这 些 消息 响应 函数 中 编写 代码 实现 这 些 功能 。 

在 VC 中 ， 用 户 可 以 通过 MFC 应 用 程序 向 导 为 控件 添加 相应 的 消息 响应 函数 。 例 如 ， 
用 户 为 浏览 按钮 添加 单 击 消息 的 响应 函数 ， 如 图 10.15 所 示 。 


Message Maps | Member Variables | Automation | Activex Events | classmfo | 


Broject: Class name: i 
P2P 网 络 播放 器 可 [cp2pview 本 -se -| 
EVAPzp 网 络 播放 器 Viewi EMWP2P 网 络 播放 器 Vicw cpp ri| 
Object IDs: Messages: Delete Function 


1D_VIEW_TOOLBAR 


IDC_EDITI BN_DOUBLECLICKED Edit Code 


IDC_LISTI 
< 
Member functions: 
W onFind ON_IDC_FIND:BN_CLICKED 
W onFind2 ON_IDC_FIND2:BN_CLICKED 


¥ oninitialupdate 
W OnKongzhi ON_IDC_KONGZHI:BN_CLICKED 
OnLivlan ON_IDC_LIULAN:BN_CLICKED 


Description: Indicates the user clicked a button 


10.15 ”为 浏览 按钮 添加 消息 响应 函数 


.294 。 
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用 户 在 控件 ID 列表 中 选择 浏览 按钮 的 ID 后 ， 在 Messages 列表 中 选择 单 击 消息 
BN_CLICKED.。 然 后 单 击 Add Function 按钮 ,弹出 Add Member Function 对 话 框 , 如 图 10.16 
所 示 。 


Memberfunction name: 


on 


Message: BN_CLICKED 
Object ID: IDC_LIULAN 


图 10.16 ”Add Member Function 对 话 框 


用 户 在 Add Member Function 对 话 框 中 ， 可 以 修改 消息 响应 函数 的 名 称 。 在 实例 中 ， 
该 消息 响应 函数 名 为 OnLiulan()。 修 改 函数 名 完成 之 后 ， 单 击 OK 按钮 ， 完 成 消息 响应 函 
数 的 添加 。 

用 户 在 VC 环境 下 ， 为 控件 添加 消息 响应 函数 ， 还 可 以 在 对 话 框 面板 上 ， 使 用 鼠标 左 
键 双击 对 应 控件 ， 也 会 弹出 如 图 10.16 所 示 的 Add Member Function 对 话 框 。 


各 注意 : 本 实例 中 ， 为 控件 添加 消息 响应 函数 的 方法 相同 。 所 以 ， 用 户 可 以 按照 上 面 所 介 
绍 的 为 浏览 按钮 添加 单 击 消息 响应 函数 的 方法 及 步骤 , 为 其 他 控件 添加 消息 响应 
函数 。 本 小 节 不 再 进行 资 述 。 


10.2.5 ”向 播放 列表 添加 MP3 文件 


在 10.2.4 节 中 ， 用 户 为 实例 中 的 所 有 控件 均 添 加 了 响应 的 控件 消息 响应 函数 。 因 此 ， 
用 户 需要 在 这 些 消 息 响应 函数 中 添加 代码 ， 以 实现 向 播放 列表 中 添加 MP3 文件 的 功能 。 由 
于 该 实例 程序 具有 查找 本 地 文件 和 查找 网 络 文件 的 功能 ， 所 以 ， 在 本 节 中 将 首先 向 用 户 介 
绍 查找 和 播放 本 地 MP3 文件 的 实现 。 而 网 络 文件 方面 的 操作 将 在 10.3 节 中 向 用 户 进行 
讲解 。 

1. 实现 组 框 选择 功能 


当 程 序 开始 运行 时 ， 用 户 需 要 在 “是 否 保存 网 络 文件 ”组 框 中 ， 选 择 是 否 保存 当前 所 
使 用 的 MP3 文件 。 如 果 用 户 选择 “ 否 ” 单 选 按钮 ， 则 “浏览 ”按钮 处 于 禁用 状态 。 否 则 ， 
“浏览 ”按钮 将 处 于 可 用 状态 ， 以 便 用 户 选择 文件 的 保存 路 径 。 代 码 如 下 : 


void CP2PView: :OnRadiol () // 用 户 选择 “是 ” 单 选 按钮 
{ 


GetDlgItem(IDC_LIULAN) ->EnableWindow (true); // 使 “浏览 ”按钮 处 于 可 用 状态 
GetDlgItem(IDC_RADIO2) ->EnableWindow (false); // 禁 用 组 框 中 的 “ 否 ” 单 选 按钮 
: :SetWindowText (this->GetParent () ->m_hWnd, "注意 ; 文件 使 用 后 将 保存 到 您 所 选择 的 
保存 路 径 中 ! ") ， 
// 设 置 框架 标题 ， 提 醒 用 户 
LD 


void CP2PView: :OnRadio2 () // 用 户 选 择 “ 否 ” 单 选 按钮 
{ 


“5 


: :SetWindowText (this->GetParent () ->m_hWnd, "注意 : 您 选择 了 使 用 文件 后 ， 将 其 
删除 ! ") 


} 


用 户 在 函数 OnRadio10 中 ， 实 现 了 “浏览 ”按钮 的 状态 改变 ， 并 且 禁 用 了 “和 否 ” 单 选 
按钮 ， 防 止 用 户 误 操 作 ， 引 起 程序 运行 异常 。 而 在 函数 OnRadio20 中 ， 只 是 简单 地 设置 了 
F 没 有 “是 ” 单 选 按钮 ， 这 样 可 以 方便 用 户 保存 文件 操作 。 程 序 运行 后 ， 用 户 


提醒 消息 ， 


六 
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// 设 置 框架 标题 ， 提 醒 用 户 


可 以 分 别 选择 组 框 中 的 两 个 单 选 按钮 ， 如 图 10.17 和 图 10.18 所 示 。 


用 户 在 图 10.17 中 ， 可 以 看 到 当选 择 了 “是 ” 单 选 按钮 后 ， 


态 ， 并 且 在 标题 上 出 现 了 提示 信息 。 


26° 


+- 注意: 您 使 用 文件 后 。 该 文件 将 保存 到 念 所 选择 的 保存 路 径 --- 若 ] 
文件 FE) 编辑 开 ) 查看 QD 帮助 00 
DB “SRS? 


是 否 保存 同 络 文件 
文件 保存 路 径 : Tm | 


] 
他 是 ( 使 用 后 如 续 保存 ) 


EE 


[ES [i 


图 10.17 选择 “是 ” 单 选 按钮 改变 界面 显示 


-二 无 标题 - P2P 网 络 播放 器 


是 否 保存 网 络 文件 


| 
百合 用 后 格 流入 队 得 鬼 隐 络 文件 | 查找 本 地 文件 | 手动 控制 播放 
EN 73 文 Hg 和 


歌曲 名 I 


图 10.18 选择 “ 否 ” 单 选 按 钮 出 现 提示 信息 


“浏览 ”按钮 处 于 可 用 状 
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在 组 框 中 ， 用 户主 要 实现 是 否 保存 当前 所 使 用 文件 的 功能 。 如 果 需 要 保存 ， 则 选择 所 
保存 的 路 径 。 和 否则， 提示 用 户 当前 选择 的 选项 功能 。 


2. 实现 浏览 按钮 功能 


当 用 户 在 组 框 中 选择 了 “是 ” 单 选 按钮 后 ， 需 要 通过 该 按钮 选择 文件 的 保存 路 径 ， 并 
将 该 路 径 显示 在 路 径 编辑 框 中 。 代 码 如 下 : 


void CP2PView: :OnLiulan() 
{ 


Cstring str2,strTmp; // 定 义 字符 串 变 量 
BROWSEINFO bBinfo; // 定 义 结构 变量 
memset (&bBinfo, 0, sizeof (BROWSEINFO) ) 7 // 定 义 结构 并 初始 化 为 0 
bBinfo.hwndOowner=m hWnd; // 设 置 对 话 框 所 有 者 句柄 
bBinfo.1lpszTitle=" 请 选择 保存 路 径 : "7 // 修 改 显 示 的 字符 串 
bBinfo.ulFlags=BIF RETURNONLYFSDIRS; // 设 置 标志 只 允许 选择 目录 
LPITEMIDLIST lpDlist; 
lpDlist=SHBrowseForFolder (&bBinfo) 和 // 显 示 目 录 选 择 对 话 框 


if (1pDlist!=NULL) 


{ 
SHGetPathFromIDList (lpDlist, strTmp.GetBuffer (0)); 


// 把 项 目标 识 列表 转化 成 目录 字符 串 
GetDlgItem(IDC EDIT]1)->SetWindowText (strTmp); 


// 将 路 径 字 符 串 显示 在 编辑 框 中 
} 
在 代码 中 ， 用 户 首先 调用 函数 SHBrowseForFolder0 弹 出 浏览 文件 夹 对 话 框 。 然 后 ， 调 
用 函数 SHGetPathFromIDListO 将 用 户 的 选择 转换 为 路 径 字 符 串 显示 在 编辑 框 中 。 


全 注意 : 函数 SHBrowseForFolder0 用 于 显示 “浏览 文件 夹 ”对 话 框 。 其 参数 是 指向 结构 体 
BROWSEINFO 的 指针 变量 ,用 于 设置 该 “浏览 文件 天 ”对 话 框 的 基本 信息 。 在 
本 节 中 ， 不 对 该 函数 进行 详细 的 介绍 ， 用 户 只 需 明白 其 功能 即 可 。 
当 用 户 单 击 “ 浏 览 ” 按 钮 以 后 ， 程 序 会 弹出 “浏览 文件 夹 ”对 话 框 ， 如 图 10.19 所 示 。 
用 户 在 “浏览 文件 夹 ” 对 话 框 中 选择 好 文件 所 保存 的 路 径 后 ， 单 击 “ 确 定 ” 按 钮 返回 到 程 
序 主 界面 ,此 时 ,在 文件 保存 路 径 文本 框 中 已 经 显示 了 用 户 刚 才 选 择 的 保存 路 径 , 如 图 10.20 
所 示 。 


神 览 文件 夫 a 
“ae Me) wet cs  [G] 
FRRRRW ep | 吉本 夫人 | Faas 
EE lm 
A 
J 3 二 三 可 | 二 = 
图 10.19 “浏览 文件 夹 ” 对 话 框 图 10.20 显示 所 选择 的 文件 保存 路 径 
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在 这 一 节 中 ， 主 要 向 用 户 介绍 了 显示 “浏览 文件 夹 ” 对 话 框 的 方法 。 
3. 实现 查找 本 地 文件 功能 


在 本 章 实例 中 ， 用 户 不 但 可 以 访问 网 络 中 的 相关 文件 ， 还 可 以 搜索 本 地 相关 的 文件 。 
然后 ， 将 搜索 到 的 文件 添加 到 列表 中 。 这 个 功能 是 在 查找 本 地 文件 按钮 的 消息 响应 函数 中 
实现 ， 其 代码 如 下 : 


void CP2PView::OnFind2() 
{ 


CFileFind findfile; // 定 义 搜索 文件 类 对 象 
CString str2,strTmp; // 定 义 字符 串 
Cstring strpath=""; 
BROWSEINFO bBinfo; // 定 义 结构 体 变量 
memset (&bBinfo, 0, sizeof (BROWSEINFO) ) ; // 定 义 结构 并 初始 化 
bBinfo.hwndOowner=m hWnd; // 设 置 对 话 框 所 有 者 句柄 
bBinfo.1pszTitle=" 请 选择 安装 路 径 ， "7 // 修 改 显 示 的 文字 信息 
bBinfo.ulFlags=BIF RETURNONLYFSDIRS; // 设 置 标 志 只 允许 选择 目录 
LPITEMIDLIST lpDlist; 
lpDlist=SHBrowseForFolder (&bBinfo) ; // 显 示 选 择 对 话 框 


if (1pDlist!=NULL) 
{ 
SHGetPathFromIDList (1pDlist, strTmp.GetBuffer (0) ) ; // 把 选项 转化 成 目录 字符 串 


strcat (strTmp.GetBuffer (0),"\\*.mp3"); // 连 接 字符 串 
findfile.FindFile (strTmp); // 查 找 指定 类 型 的 文件 
while (findfile.FindNextFile()) // 继 续 查 找 文件 
str2=findfile.GetFilePath (); // 获 取 文 件 路 径 
CFile file(str2,CFile::modeRead) 7 // 创 建文 件 对 象 
file.Seek(-128,CFile::end); // 从 文件 结尾 处 移动 文件 指 
针 
file.Read (gmp.mp3,128); // 读 取 文件 
file.close(); // 关 闭 文件 
int nRow=m list.InsertItem(m list.GetItemCount ()+1,mp.mp3.title);// 插 入 行 
m list.SetItemText (nRow,1,mp.mp3.arti); // 设 置 列表 数据 
if (mp.mp3.heade && "TAG") // 如 果 文 件 是 MP3 格式 
{ 

Cstring mp3="MP3"; // 定 义 字符 串 
m list.SetItemText (nRow, 2, mp3); // 设 置 列表 数据 
} 
m 1ist.SetItemText (nRow,3, str2); 
sprintf (mp.str,"%s", str2.GetBuffer (1)); // 格 式 化 输出 字符 数组 
mp.mp3.text [28]=0; // 填 充 结构 体 中 的 各 个 成 员 


mp.mp3.year[4]=0; 
mp.mp3.alb[30]=0; 
CFile filel ("列表 .TXT",CFile: :modeReadWrite|CFile::modeNoTruncate 


ICFile: :modeCreate|CFile::typeBinary); // 创 建文 件 对 象 
filel.Seek(0,CEile::end) // 将 文件 指针 移动 到 文件 最 后 
filel.Write(&mp,sizeof (mp) ); // 将 数据 写 入 文件 
filel.Flush(); // 强 制 写 入 数据 
filel.Close(); // 关 闭 文件 
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在 代码 中 ， 用 户 仍然 是 调用 函数 SHBrowseForFolder0 显 示 “ 浏 览 文件 夹 ”对 话 框 。 程 
序 根据 用 户 在 该 对 话 框 上 的 选择 ， 返 回 所 选 目录 的 路 径 。 接 着 ,程序 将 该 路 径 与 字符 串 
“.\\*.mp3” 连 接 ， 表 示 搜 索 该 路 径 下 所 有 MP3 文件 。 


全 注意 : 在 程序 中 , 结构 体 变量 mp 是 用 户 在 第 9 章 中 自 定义 结构 体 mp3str 的 结构 体 变量 。 


搜索 MP3 文件 的 功能 主要 由 文件 搜索 类 CFileFind 完成 。 当 用 户 搜索 到 相应 文件 时 ， 
使 用 文件 对 象 从 文件 数据 中 读 取 128 字 节 的 数据 到 结构 体 mp3str 中 。 程 序 在 每 读 取 一 个 
MP3 文件 时 ， 便 将 该 文件 的 相关 信息 添加 到 播放 列表 并 写 入 文件 中 保存 。 用 户 运 行程 序 ， 
单 击 “ 查 找 本 地 文件 ”按钮 ， 如 图 10.21 所 示 。 
-- 注意 = 您 使 用 文件 后 。 该 文件 将 保存 到 候 所 选择 的 保存 路 径 .-- 居 j 口 区 


文件 下， 编辑 下 ) 查看 WD 帮助 0 
DB “Se? 


是 否 保存 网 络 文件 


太 是 ( 使 用 后 继续 保存 ) 文件 保存 路 径 : | ”二 浏览 


10.21 搜索 本 地 文件 
用 户 可 以 从 图 10.21 中 看 到 ， 搜 索 到 的 MP3 文件 都 被 添加 到 了 列表 中 。 


候 注 意 : 在 本 节 中 ， 由 于 “查找 网 络 文件 ”按钮 的 消息 响应 函数 涉及 的 知识 很 多 ， 需 要 向 
用 户 详细 讲解 。 所 以 ， 对 于 “查找 网 络 文件 ”按钮 的 消息 响应 函数 实现 方法 将 在 
后 面 几 节 中 讲解 。 


10.2.6 ”播放 MP3 文件 
在 程序 中 , 用 户 播放 MP3 文件 可 以 通过 双击 播放 列表 中 的 选项 进行 播放 , 或 者 是 通过 
手动 控制 进行 MP3 文件 的 播放 以 及 控制 .在 本 节 中 ,将 向 用 户 介绍 这 两 种 方法 的 具体 实现 。 
1. 双击 列表 选项 播放 MP3 


当 用 户 通过 搜索 功能 将 MP3 文件 添加 到 列表 中 , 双击 列表 选项 后 , 程序 应 该 播放 对 应 
的 MP3 文件 。 该 功能 与 第 9 章 中 的 功能 实现 基本 一 致 ， 均 是 通过 调用 MCI 函数 实现 。 首 
先 ， 为 列表 控件 添加 鼠标 双击 消息 响应 函数 。 然 后 ， 在 该 响应 函数 中 添加 代码 。 其 代码 
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如 下 : 

void CP2PView: :OnDblclkList] (NMHDR* pNMHDR, LRESULT* pResult) 

Cstring str; // 定 义 字符 串 变量 
POSITION pos=m list.GetFirstSelectedItemPosition (); // 获 取 用 户 双 击 位 置 
if (pos==NULL) // 判 断 位 置 是 否 为 空 
和 

MessageBox (" 用 户 双击 位 置 错误 ! ") ; // 显 示 错 误 信 息 
} 
slage 


{ 
int nItem-=m 1ist.GetNextSelectedItem(pos);// 获 得 双击 位 置 的 索引 值 
index=nItem; 


str=m list.GetItemText (nItem, 3); // 获 得 该 索引 位 置 的 第 三 列 字 符 
if(open.wDeviceID) // 判 断 MCI 设备 是 否 初始 化 
{ 
mciSendCommand (open .wDeviceID, MCI_CLOSE,0,0);// 关 闭 MCI 设备 

1 
open.lpstrElementName=str; // 向 MCI 设备 传送 文件 路 径 
open.lpstrDeviceType="mpegvideo"; // 指 定 MCI 设备 类 型 
err=mciSendCommand (0, MCT OPEN,MCI OPEN TYPE|MCI OPEN ELEMENT1MCI_WRAIT, ( 
DWORD) (LPVOID) &open); // 初 始 化 MCI 设备 
if (err==0) // 如 果 设备 初始 化 成 功 
下 
MCI_PLAY PARMS play; // 定 义 播放 结构 体 
mcisendCommand (open.wDeviceID,MCI PLAY,O0, (DWORD) gplay); 

// 向 MCI 设备 发 送 播放 指令 


3 


*pResult = 07 
} 


在 程序 中 ， 变 量 err、index、open 等 均 为 视图 类 中 定义 的 成 员 变 量 。 代 码 如 下 : 


class CP2PView : public CFormView 


Ss 
CP2PDoc* GetDocument (); 
mp3str mp; 
MCI_OPEN_PARMS open; //MCI 设备 初始 化 结构 体 
DWORD err; // 错 误 信息 变量 


int index; // 记 录 当 前 播放 列表 的 索引 值 
2 // 省 略 部 分 代码 


全 注意 : 用 户 在 实际 编程 时 ， 一 定 需要 首先 判断 指定 ID 号 的 MCI 设 备 是 否 存在 。 如 果 存 
在 ， 则 向 该 设备 发 送 关闭 指令 以 后 ， 再 重新 进行 初始 化 。 否 则 用 户 编写 的 程序 不 
能 使 用 该 MCI 设备 。 如 果 用 户 对 MCI 函数 的 一 些 用 法 还 不 熟悉 ， 请 复习 第 9 章 
中 的 相关 内 容 或 结合 实例 程序 与 MSDN 进行 学 习 。 


2. 改变 播放 控制 按钮 的 状态 


用 户 在 实例 程序 中 , 除了 使 用 双击 列表 选择 的 方法 播放 MP3 以 外 , 还 可 以 使 用 手动 控 
制 的 方法 进行 播放 。 但 是 ， 在 程序 初始 化 时 ， 这 些 播放 控制 按钮 均 处 于 禁用 状态 。 因 此 ， 
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户 必须 在 程序 中 修改 其 状态 设置 ， 实 现 这 一 功能 可 以 有 两 种 方法 。 分 别 是 通过 “手动 控 
制 播放 ”按钮 和 视图 显示 更 新 函数 OnDrawO。 下 面 将 向 用 户 介绍 这 两 种 方法 的 代码 实现 。 
首先 ， 在 “手动 控制 播放 ”按钮 的 消息 响应 函数 OnKongzhi0 中 ， 改 变 “ 播 放 ” 等 控 
制 按钮 的 显示 状态 。 代 码 如 下 : 

void CP2PView: :OnKongzhi() 

{ 

GetDlgItem(IDC PLAY)->EnableWindow (true); /1 改变 各 个 控件 的 显示 状态 
GetDlgItem(IDC STOP)->EnableWindow (true); 

GetDlgItem(IDC PRE)->EnableWindow (true); 

GetDlgItem(IDC NEXT)->EnableWindow (true); 

flag=1; // 设 置 状态 标志 

} 


用 户 将 上 面 的 代码 编译 运行 。 然 后 单 击 “ 手 动 控制 播放 ”按钮 ， 会 看 到 几 个 控制 播放 
的 按钮 均 处 于 可 用 状态 ， 如 图 10.22 所 示 。 
二 无 标题 - P2P 网 络 播放 器 


文件 如 妨 旬 中 查看 GD) 帮助 0 
IDB "eG? 


是 否 保存 网 络 文件 


| 
| 直人 用 后 村 法 了 》 。。 亚 反 Fyg 文 件 | 查 所 地 文件 | | 生动 人 和 | 


10.22 ”使 用 “手动 控制 播放 ”按钮 改变 控制 按钮 的 状态 


用 户 在 实际 编程 中 ， 除 了 使 用 “手动 控制 播放 ”按钮 改变 “播放 ”等 主要 控制 按钮 的 
状态 以 外 。 还 可 以 根据 播放 列表 中 是 否 有 可 用 的 MP3 文件 , 对 这 些 主要 控制 按钮 的 状态 进 
行 设置 。 代 码 如 下 : 

void CP2PView: :OnDraw (CDC* pDC) 

和 

ifm list.GetItemCount () !=0 && flag!=1)// 判 断 播放 列表 中 的 文件 数目 是 否 为 0 
// 若 数目 不 为 0， 则 将 控制 按钮 的 状态 设置 为 可 用 

GetDlgItem(IDC PLAY)->EnableWindow (true) 

GetDlgItem(IDC STOP)->EnableWindow (true); 

GetDlgItem(IDC PRE)->EnableWindow (true); 

GetDlgItem(IDC NEXT)->EnableWindow (true); 


} 
} 


i 
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用 户 将 以 上 程序 编译 运行 后 , 单 击 “ 搜 索 本 地 文件 ”按钮 向 播放 列表 中 添加 MP3 文件 。 
然后 ， 用 户 会 看 到 “播放 ”等 控制 按钮 均 处 于 可 用 状态 。 这 是 因为 当 用 户 向 列表 中 添加 文 
件 成 功 后 ， 程 序 界面 会 使 用 函数 OnDraw0 进 行 更 新 ， 如 图 10.23 所 示 。 

二 无 标题 - P2P 网 络 播放 器 

文件 到) 编 辑 邓 ) 查看 帮助 00 
DBA SRS® 
是 否 保存 网 络 文件 


三 是 ( 使 用 后 继续 保存 ) 文件 保存 路 径 : | 


ll | ell sl 


图 10.23 ”使 用 视图 更 新 函数 对 控制 按钮 的 状态 进行 修改 
当 这 些 主要 控制 播放 的 按钮 可 用 后 ,用 户 便 可 以 使 用 这 些 按钮 来 对 MP3 文件 的 播放 进 
行 控制 。 例 如 ， 和 暂停 、 播 放 、 更 换 曲 目 等 操作 。 
3. 实现 播放 控制 


当 播放 控制 按钮 处 于 可 用 状态 后 ,用 户 便 可 以 使 用 这 些 按钮 控件 对 MP3 文件 的 播放 状 
态 进行 相关 控制 。 首 先 ， 用 户 在 “播放 ”按钮 的 消息 响应 函数 OnPlay0 中 ， 添 加 播放 控制 
的 相关 代码 ， 其 代码 如 下 : 


void CP2PView: :OnPlay () 


Cstring str, text; // 定 义 字符 串 变量 

char str1[100]; // 定 义 字符 数组 

str=m list.GetItemText (n,3); // 获 取 默 认 列表 项 中 的 MP3 文件 路 径 
if(open.wDeviceID) // 判 断 指定 ID 的 McI 设备 是 否 初始 化 


mciSendCommand (open.wDeviceID,MCI_CLOSE,0,0) 7 
// 若 初始 化 ， 则 发 送 关 闭 命令 到 MCI 


open.lpstrElementName=str; // 获 取 的 路 径 传 给 MCI 初始 化 结构 体 
open.lpstrDeviceType="mpegvideo"; // 指 定 MCI 的 设备 类 型 
err=mciSendCommand (0, MCI OPEN,MCI OPEN TYPE1MCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); // 初 始 化 MCI 设备 


GetDlgItem(IDC PLAY)->SetWindowText (text); 
if (text==" 播 放 ") 
玫 
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if (err==0) // 若 初始 化 成 功 
{ 
MCI PLAY PARMS play; 
mciSendCommand (open .wDeviceID,MCI PLAY,O0, (DWORD) gplay); 
// 向 MCI 设备 发 送 播放 命令 
GetDlgItem(IDC PLAY) ->SetWindowText ("暂停 "); 
| 


else // 若 设备 初始 化 失败 
mciGetErrorstring (err, (LPSTR) strl,100) 7 // 获 取 错 误 信息 
MessageBox (str1); // 显 示 错误 信息 
} 
else 


{ 
mciSendCommand (open .wDeviceID,MCI PAUSE, 0,0);// 向 MCI 设备 发 送 暂停 命令 
GetDlgItem(IDC_PLAY) ->SetWindowText ("播放 "); 


用 户 在 上 面 的 程序 中 ， 看 到 函数 GetItemText0 的 第 一 个 参数 是 n。 该 参数 表示 用 户 在 
列表 中 选择 的 列表 项 索引 值 。 用 户 可 以 在 列表 控件 的 单 击 消息 响应 函数 OnClickList10 中 ， 
获取 当前 所 选择 的 项 索引 并 将 该 索引 值 传递 给 参数 n。 代 码 如 下 : 


void CP2PView: :OnClickListl (NMHDR* pNMHDR, LRESULT* PResult) 
{ 


int nItem; // 定 义 变量 保存 列表 索引 
POSITION pos=m list.GetFirstSelectedItemPosition();// 获 取 用 户 单 击 的 位 置 
if (pos!=NULL) // 判 断 单 击 位 置 是 否 为 空 
nItem=m list.GetNextSelectedItem(pos); // 获 取 单 击 位 置 的 列表 索引 
n=nItem; // 将 该 索引 值 赋 给 变量 n 


} 
*pResult = 0; 


} 

用 户 通过 以 上 两 个 步骤 , 已 经 实现 了 实例 程序 基本 的 MP3 播放 功能 。 下 面 将 根据 变量 
n 的 值 对 其 他 控制 按钮 的 功能 进行 实现 。 

当 用 户 需要 停止 当前 所 播放 的 MP3 时 ， 单 击 “ 停 止 ”按钮 可 以 实现 该 功能 。 并 且 当 用 
户 再 次 单 击 “ 播 放 ” 按 钮 时 ， 程 序 所 播放 的 MP3 文件 为 当前 文件 的 后 面 第 三 个 MP3 文件 。 
代码 如 下 : 


void CP2PView: :Onstop() 
lL 


mciSendCommand (open.wDeviceID,MCI_STOP, 0,0);// 向 MCI 设备 发 送 停止 命令 


if(n<m 1ist.GetItemCount () ) // 判 断 当前 列表 索引 是 否 超出 列表 项 目 数 
n+=37 // 将 索引 值 加 3 

人 // 如 果 当 前 索引 值 超出 列表 项 目 数 

n=07 // 将 索引 值 设置 为 0 


} 
} 


如 果 用 户 需要 播放 当前 MP3 文件 的 上 一 首 或 者 下 一 首 时 ， 可 以 通过 单 击 “ 上 一 首 ” 或 
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者 “下 一 首 ” 按 钮 即 可 实现 这 些 功 能 。 首 先 ， 在 “下 一 首 ”按钮 的 消息 响应 函数 中 添加 功 
能 代码 。 其 代码 如 下 : 


void CP2PView: :OnNext () // 下 一 首 按钮 消息 响应 函数 
人 
if (n<m_ list.GetItemCount ()) // 判 断 当 前 列表 索引 值 是 否 大 于 列表 总 数 
1 
DT+=17 
CString str=m 1ist.GetItemText (n,3) ;// 获 取 默认 列表 项 中 的 MP3 文件 路 径 
if(open.wDeviceID) // 判 断 指定 ID 的 MCI 设备 是 否 初始 化 


mciSendCommand (open .wDeviceID,MCI CLOSE,0,0); 
// 若 初始 化 ， 则 发 送 关 闭 命令 到 MCI 
} 


open.lpstrElementName=str; // 获 取 的 路 径 传 给 MCI 初始 化 结构 体 
open.lpstrDeviceType="mpegvideo"; // 指 定 McCI 的 设备 类 型 
err=mciSendCommand (0, MCIT_ OPEN,MCI OPEN TYPE|MCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); 


} 

if (err==0) // 若 初始 化 成 功 
MCI_PLAY PARMS play; // 则 向 MCI 设备 发 送 播放 命令 
mcisendCommand (open.wDeviceID,MCI PLAY,O0, (DWORD) gplay); 


} 
} 


然后 ， 在 “上 一 首 ” 按 钮 的 消息 响应 函数 中 添加 代码 。 其 代码 如 下 : 


void CP2PView: :OnPre() // 上 一 首 按钮 消息 响应 函数 
{ 
CString str; // 定 义 字符 串 变量 
if (n==0) // 如 果 当 前 索引 值 为 0 
{ 
n=0; 
} 
else 
{ 
n=n-1; // 否 则 ， 将 当前 索引 值 减 一 
} 
str=m list.GetItemText (n,3); // 获 取 指 定 索引 值 项 目的 路 径 字 符 串 
if (open.wDeviceID) // 判 断 指定 ID 的 MCI 设备 是 否 存 在 
i 


mciSendCommand (open .wDeviceID,MCI CLOSE,0,0); 
// 车 存在 ， 则 发 送 关闭 命令 到 MCI 设备 
} 


open.lpstrElementName=str; // 将 获取 到 的 路 径 字 符 串 赋予 该 成 员 
open.lpstrDeviceType="mpegvideo"; 

err=mciSendCommand (0, MCI OPEN,MCI OPEN TYPE1MCI OPEN ELEMENTIMCI WAIT,( 
DWORD) (LPVOID) &open); // 向 MCI 设备 发 送 初始 化 命令 

if (err==0) // 若 初始 化 MCI 设备 发 生 错误 


并 
MCI PLAY PARMS play; 


mciSendCommand (open .wDeviceID,MCI PLAY,O0, (DWORD) gplay); 
// 向 MCI 设备 发 送 播放 指令 
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10.3 客户 机 之 间 的 连接 


在 本 章 实 例 中 ,主要 向 用 户 介绍 使 用 P2P 技术 实现 客户 机 之 间 的 连接 与 数据 传输 等 操 
作 。 因 此 ， 在 本 节 中 ， 将 重点 介绍 客户 机 之 间 的 连接 编程 。 


10.3.1 创建 套 接 字 


与 其 他 网 络 程序 一 样 ，P2P 网 络 播放 器 同样 需要 套 接 字 的 支持 。 所 以 ， 用 户 在 实际 编 
程 时 ， 其 编程 流程 与 套 接 字 编 程 流程 相同 。 在 本 节 中 ， 将 向 用 户 介绍 编写 P2P 程序 的 一 般 
流程 以 及 方法 ， 并 且 用 户 在 套 接 字 创 建成 功 后 ， 使 用 异步 模式 对 该 套 接 字 进行 操作 的 方法 
实现 等 。 关于 异步 套 接 字 的 操作 方法 等 已 经 在 前 面 的 章节 中 向 用 户 进行 详细 的 讲解 。 所 以 ， 
在 本 节 中 ， 将 不 再 向 用 户 讲解 这 方面 的 基础 知识 。 请 用 户 复习 前 面 的 相关 知识 。 

1. 定义 套 接 字 对 象 

用 户 在 编写 任何 网 络 程序 时 ， 都 需要 首先 创建 套 接 字 对 象 或 句柄 以 后 ， 才 能 成 功 进行 
网 络 传输 。 因 此 ， 在 本 实例 中 ， 用 户 需 要 在 视图 类 中 定义 套 接 字 对 象 或 句柄 。 由 于 本 实例 
是 基于 API 函数 编写 ， 所 以 在 这 里 定义 套 接 字句 柄 即 可 。 代 码 如 下 : 


class CP2PView : public CFormView 


public: 
本 // 省 略 部 分 变量 定义 
SOCKET sl; // 定 义 套 接 字句 柄 变量 


在 程序 中 ,用 户 一 共 定义 了 两 个 套 接 字句 柄 ， 这 是 因为 在 P2P 程序 中 需要 计算 机 既 可 
以 是 服务 器 又 可 以 是 客户 端 。 其 中 套 接 字句 柄 sl 是 作为 服务 器 套 接 字 ， 而 套 接 字 句柄 s2 
则 作为 客户 端 套 接 字 。 这 样 ， 用 户 所 编写 的 P2P 程序 便 具有 了 接收 数据 与 主动 搜索 数据 的 
功能 了 。 

如 果 定 义 套 接 字句 柄 成 功 后 , 用 户 便 可 以 在 视图 初始 化 函数 OnInitialUpdate0 中 ,使 用 
API 函数 socketO 创 建 套 接 字 句柄 。 代 码 如 下 : 


void CP2PView::OnInitialUpdate() 


WSADATA data; // 定 义 结构 体 变量 
DWORD ss=MAKEWORD(2,0); // 定 义 套 接 字 版 本 信息 
: :WSAStartup (ss, &data); // 初 始 化 套 接 字库 
s1=: :socket (AF_INET, SOCK STREAM, IPPROTO_ TCP); 
// 创 建 套 接 字 
s2=: :socket (RE INET, SOCK STREAM,IPPROTO TCP); 
// 省 略 部 分 代码 


这 


在 程序 中 ， 用 户 使 用 API 函数 创建 了 两 个 套 接 字 句柄 s1 和 s2。 用 户 在 后 面 的 所 有 网 
络 数据 传输 等 操作 ， 均 是 通过 这 两 个 套 接 字句 柄 进行 实现 。 


Ms 
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2. 绑 定 套 接 字 句柄 


如 果 用 户 成 功 创建 套 接 字 后 ， 则 需要 将 服务 器 套 接 字 句柄 与 本 地 地 址 和 端口 号 绑 定 在 
一 起 。 这 样 ， 程 序 才能 接收 到 其 他 客户 机 的 数据 请 求 。 程 序 中 ， 用 户 绑 定 服务 器 套 接 字 可 
以 使 用 API 函数 bind0 等 实现 。 代 码 如 下 : 


本 // 省 略 部 分 代码 
: :gethostname ( (char*) gname, (int) sizeof (name) ); // 获 得 主机 名 字 
hostent *p=: :gethostbyname ( (char*) gname); // 将 主机 名 转换 为 地 址 结构 变量 
in addr *a=(in addr*)*p->h addr list; // 获 得 本 机 IP 地 址 
CString str=::inet ntoa(la[0]); // 将 IP 地 址 转换 为 主机 IP 地 址 
sockaddr in addr; // 定 义 套 接 字 信息 结构 体 变量 
adqr.sin family=AF INET; // 填 充 该 结构 体 中 的 成 员 变 量 
addr.sin port=htons (80); 
addr.sin addr.s un.s addr=inet addr (str); 
::bind(sl, (sockaddr*) gaddr, sizeof (addr)); // 绑 定 套 接 字句 柄 到 本 地 地 址 
::listen(s1,5); // 监 听 套 接 字 
SS // 省 略 部 分 代码 


在 程序 中 ， 函 数 listen0 的 第 二 个 参数 设置 为 5， 表 示 在 服务 器 套 接 字 s1 上 支持 同时 响 
应 5 个 客户 机 的 连接 请 求 。 


息 注 意 : 如 果 用 户 对 套 接 字 编 程 的 基础 知识 不 熟悉 ， 请 复习 前 面相 关 章节 的 基础 知识 。 


3. 设置 异步 套 接 字 


在 本 实例 中 ， 将 采用 异步 套 接 字模 式 进行 编程 操作 。 其 优点 是 当 且 仅 当 该 异步 套 接 字 
上 有 数据 请 求 或 传输 时 ， 程 序 才 会 调用 相关 的 函数 进行 处 理 。 代 码 如 下 : 


// 省 略 部 分 代码 
WsAAsyncselect (sl， this->m_hWnd,WM_SOCK, FD_ACCEPT|FD_READ) ; // 设 置 异 步 套 接 字 
WSAAsyncSelect (s2, this->m | | hwnd, WM_SOCK, FD ACCEPT|FD READ); 


函数 WSAAsyncSelect 的 作用 是 将 指定 的 套 接 字 句柄 设置 为 异步 模式 ， 并 指定 该 套 接 
字 上 发 生 的 网 络 事件 以 及 处 理 这 些 事件 的 窗口 消息 等 。 用 户 需 要 自 定义 窗口 消息 
WM_SOCK， 并 且 为 该 消息 指定 相应 的 消息 响应 函数 。 代 码 如 下 : 


#define WM SOCK WM USER+100 // 自 定义 消息 
class CP2PView : public CFormView 
{ 
protected: 
//{{AFX MSG (CP2PView) 
// 省 略 部 分 代码 
msg void Onsoc (WPARAM wParam,IPRRRM 1Param) ;// 声 明 消息 响应 函数 
} 


然后 ， 再 在 视图 类 的 实现 文件 中 添加 套 接 字 消息 映射 表 。 代 码 如 下 : 


ee // 省 略 部 分 代码 

IMPLEMENT DYNCRERTE (CP2PView, CFormView) 

BEGIN MESSAGE MRP (CP2PView, CFormView) 
//{{AFX MSG MAP (CP2PView) 
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3 // 省 略 部 分 代码 
ON BN CLICKED (IDC NEXT, OnNext) 
ON BN CLICKED (IDC RADIO1，OnRadiol) 
ON_BN CLICKED (IDC_ RADIO2, OnRadio2) 
ON NOTIFY (NM DBLCLK, IDC LIST1, OnDblclkList1) 
ON NOTIFY (NM CLICK, IDC LIST1, OnClickList1) 
ON_MESSAGE (WM SOCK, Onsoc) // 套 接 字 消息 映射 表 
//}}AFX MSG MRP 

END MESSAGE MRP () 


用 户 通过 以 上 几 个 步 又， 已 经 基本 完成 了 异步 套 接 字 的 设置 。 
10.3.2 ”使 用 SOCKET 数组 保存 套 接 字 句柄 


因为 基于 P2P 编写 的 程序 可 以 响应 多 个 客户 机 的 连接 请 求 ， 或 者 向 多 个 客户 机 发 送 数 
据 请 求 等 特点 。 所 以 ， 在 实例 程序 中 ， 用 户 需 要 定义 一 个 套 接 字 数组 保存 相应 的 套 接 字 
句柄 。 

首先 ， 用 户 在 视图 类 中 ， 定 义 一 个 SOCKET 类 型 的 套 接 字句 柄 数组 。 代 码 如 下 : 


class CP2PView : public CFormView 
» 


public: 
Pr // 省 略 部 分 代码 
SOCKET s1,s2; // 创 建 套 接 字句 柄 
SOCKET s[5]; // 创 建 套 接 字句 柄 数组 
} 


在 代码 中 ， 用 户 将 套 接 字数 组 大 小 设置 为 5。 这 是 因为 用 户 在 使 用 监听 函数 listen0) 监 
听 套 接 字 时 ， 己 经 将 其 第 二 个 参数 设置 成 了 5。 所 以 ， 用 户 在 定义 套 接 字数 组 时 ， 需 要 将 
该 数组 的 大 小 设置 为 5。 

为 了 避免 程序 在 初始 化 时 发 生 错误 ， 用 户 需要 在 视图 的 初始 化 函数 中 对 套 接 字 句柄 数 
组 进行 初始 化 。 代 码 如 下 : 


void CP2PView: :OnInitialUpdate() 
上 


CFormView: :OnInitialUpdate (); 
ee // 省 略 部 分 代码 
memset (&s, 0,5); // 将 套 接 字数 组 初始 化 为 0 
下 


当 监 听 套 接 字 上 有 相应 的 网 络 事件 到 来 时 ， 程 序 便 将 可 以 在 连接 事件 FD_ACCEPT 中 
使 用 函数 acceptO 响 应 客户 机 的 连接 请 求 。 在 响应 的 同时 ,将 服务 器 与 客户 机 之 问 收发 数据 
的 套 接 字句 柄 存放 于 套 接 字句 柄 数组 中 。 代 码 如 下 : 

void CP2PView: :Onsoc (WPARAM wParam, LPARAM lParam) 

{ 


switch (lParam) 


case FD ACCEPT: // 连 接 事件 
if (i<5) // 判 断 套 接 字句 柄 数组 的 当前 大 小 
s[i]=::accept (sl1,NULL, NULL); 
WSAAsyncSelect (s[i],this->m hWnd,WM SOCK,FD READ); 
// 将 通信 套 接 字 也 设置 为 异步 模式 


i 
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// 省 略 部 分 代码 


i // 省 略 部 分 代码 
} 
用 户 在 编程 时 ， 按 照 上 面 的 代码 样式 将 服务 器 程序 与 发 送 连接 请 求 的 客户 机 的 通信 套 
接 字 保存 在 套 接 字数 组 中 ， 然 后 调用 函数 WSAAsyncSelect0 将 该 通信 套 接 字 也 设置 为 异步 
模式 。 这 样 ， 当 实例 程序 需要 搜索 网 络 MP3 文件 时 ， 便 可 以 使 用 这 些 套 接 字 向 多 个 客户 机 
发 送 搜索 请 求 并 等 待 数据 传输 。 


10.4 传输 数据 


用 户 创建 好 实例 程序 所 需 的 套 接 字 等 变量 以 后 ， 便 可 以 通过 网 络 进行 数据 传输 了 。 首 
先 ， 应 该 是 某 台 客户 机 连接 主 计算 机 或 男 一 台 客户 机 ， 以 获取 该 网 络 中 的 所 有 在 线 客户 机 
的 地 址 信息 。 然 后 ， 再 使 用 客户 端 套 接 字 向 所 在 这 些 地 址 信息 的 计算 机 发 出 连接 请 求 。 如 
果 连 接 成 功 ， 则 继续 请 求 数据 资源 。 在 本 节 中 ， 将 主要 向 用 户 介绍 传输 数据 时 所 用 的 数据 
结构 封装 方法 以 及 数据 传输 控制 。 


10.4.1 数据 结构 


在 本 章 实例 中 , 将 继续 使 用 第 9 章 中 所 使 用 的 MP3 数据 结构 。 但 是 ,用 户 需 要 在 原 有 
数据 的 基础 上 加 入 MP3 的 实体 数据 成 员 ， 即 MP3 数据 帧 。 修 改 后 的 MP3 数据 结构 如 下 : 


typedef struct mp3_ str{ // 自 定义 MP3 标签 帧 结构 体 
char heade[3]; //TAG 字符 标记 

char title[30]; // 音 乐 文件 名 称 

char arti [30]; // 演 唱 者 

char alb [30]; // 专 辑 

char year[4]; // 出 版 年 份 

char text[28]; // 备 注 内 容 

} mp3struct; 

typedef struct mp3 s{ // 自 定义 MP3 结构 体 〈 修 改 后 的 MP3 数据 结构 
char *data; // 数 据 帧 指针 

mp3struct mp3b; // 标 签 帧 结构 体 变量 

}mp3; 


用 户 在 修改 后 的 MP3 数据 结构 中 可 以 看 到 , 新 添加 的 数据 成 员 是 字符 指针 data, 并 将 
其 定义 为 数据 帧 指针 。 本 书 使 用 该 数据 结构 操作 MP3 文件 的 方法 是 当 用 户 使 用 该 数据 结构 
读 取 MP3 文件 时 ， 需 要 使 用 MP3 文件 的 总 大 小 剪 掉 标签 帧 的 大 小 即 128 字 节 后 ， 再 将 数 
据 帧 指针 指向 数据 帧 的 首 地 址 并 将 其 读 出 。 而 写 入 MP3 文件 时 , 应 该 首先 按照 数据 帧 的 大 
小 将 数据 帧 写 入 MP3 文件 后 ， 再 将 标签 帧 中 的 数据 继续 写 入 MP3 文件 即 可 。 例 如 ， 用 户 
使 用 该 结构 读 取 并 发 送 MP3 文件 ， 代 码 如 下 : 


// 省 略 部 分 代码 
mp3 mp3data; // 定 义 MP3 数据 结构 变量 


Cstring str; 


*308°* 
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GetDlgItem(IDC EDIT1) ->GetWindowText (str) ; // 获 取 文件 路 径 
CFilefilel(str, 
CFile::modeRead|lCFile::modeCreate|lCFile: :modeNoTruncate|lCFile::typeBina 


TY) 


int n=file.GetLength()-128; 
char datal[n]={0}; 
mp3data.data=gdatal; 
file.Read (mp3data.data,n); 
file.Read (mp3data.mp3b, 128); 
send(sl, mp3data.data,n,0); 
send(sl, mp3data.mp3b,n,0); 


// 定 义 文件 对 象 并 关联 MP3 文件 

// 获 得 数据 帧 的 大 小 

// 定 义 数据 帧 缓冲 区 

// 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
// 读 取 数 据 帧 中 的 数据 到 缓冲 区 

// 读 取 MP3 标签 帧 中 的 数据 

// 发 送 MP3 数据 帧 数据 

// 发 送 MP3 标签 帧 数据 

// 省 略 部 分 代码 


用 户 在 以 上 代码 中 , 主要 将 指定 MP3 文件 的 数据 帧 和 标签 帧 从 文件 中 读 取 到 指定 缓冲 
区 中 保存 。 如 果 用 户 接收 到 MP3 文件 ， 需 要 将 该 文件 写 入 本 地 磁盘 中 ， 代 码 如 下 : 


mp3 mp3data; 
Cstring str; 
GetDlgItem(IDC_ EDIT1) ->GetWindowText (str); // 获 取 文件 路 径 
CFilefilel(str, 
CFile::modeRead|CFile: :modeCreate|CFile: :modeNoTruncate|CFile::typeBina 


ry); 


recv(s, (char *)n,1,0); 
char datal[n]={0}; 
recv(sl, &datal,n, 0); 


recv(sl,& mp3data.mp3b,128,0); 


mp3data.data=&datal; 
file.Write (mp3data.data,n); 
file.Write (mp3data.mp3b, 128); 


// 省 略 部 分 代码 
// 定 义 MP3 结构 体 对 象 


// 定 义 文件 对 象 并 关联 MP3 文件 

// 接 收 数据 帧 大 小 值 

// 定 义 数据 帧 缓冲 区 

// 接 收 数据 帧 数据 

// 接 收 标签 帧 数据 

// 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
// 写 入 数据 帧 中 的 数据 到 缓冲 区 

// 写 入 MP3 标签 帧 中 的 数据 

// 省 略 部 分 代码 


在 代码 中 ， 用 户 首 先 调用 函数 接收 MP3 文件 的 数据 帧 与 标签 帧 数据 到 指定 缓冲 区 中 。 
然后 ， 用 户 再 将 这 些 数据 写 入 文件 中 保存 。 


10.4.2 ”数据 传输 控制 


数据 传输 控制 是 指 用 户 实际 编程 时 ， 需 要 控制 数据 传输 的 顺序 等 。 该 实例 中 ， 将 查询 
MP3 文件 的 命令 以 字符 c 代替 ， 表 示 请 求 查询 MP3 资源 。 当 接收 方 接收 到 该 命令 后 ， 将 


在 本 地 计算 机 中 查找 相应 的 文件 并 读 取 到 缓冲 区 中 进行 发 送 ， 而 发 送 命令 方 则 接收 数据 并 
写 入 文件 。 


1. 发 送 查询 命令 


在 实例 中 ， 将 定义 字符 c 为 查询 命令 字符 。 所 以 ， 当 用 户 编写 程序 时 ， 使 用 客户 端 套 
接 字 将 该 字符 发 送 到 对 方 计算 机 即 可 。 代 码 如 下 : 


char ml=’c’; 
send(s2,ml,1,0); 


// 省 略 部 分 代码 
// 定 义 命令 字符 
// 发 送 查 询 命令 字符 
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// 省 略 部 分 代码 


因此 ， 在 实例 程序 中 ， 用 户 应 该 将 发 送 命令 字符 的 功能 放 在 “查找 网 络 文件 ”按钮 的 
消息 响应 函数 中 。 代 码 如 下 : 


void CP2PView: :OnFind() 


char ml='c'; // 定 义 命令 字符 
socketaddr in adqr7 // 定 义 地 址 结构 
adqdr.sin family=AF INET; // 填 充 地 址 结构 中 的 成 员 


addr .sin port=htons (80) 
addr.sin addr.S un.S addr=inet addr (str) 7 
if(connect(s2,( sockaddr*)addr,sizeof (addr))!=-1) 


// 连 接 远程 计算 机 
// 发 送 查 询 命令 字符 


1 
send(s2,ml,1,0); 
1 
} 


在 代码 中 ， 变 量 str 表示 远程 计算 机 的 瑟 地址 。 用 户 在 使 用 实例 程序 时 ， 需 要 提供 一 
个 远程 计算 机 的 IP 地 址 才能 使 用 。 但 是 ， 用 户 只 需 输入 一 个 远程 计算 机 的 人 P 地 址 ， 当 程 
序 连接 后 会 自动 获取 其 他 计算 机 的 瑟 地址。 

2. 接收 命令 并 发 送 文件 


当 接 收 方 客户 机 接收 到 查询 命令 之 后 ， 会 在 本 地 计算 机 中 查询 盘 中 的 所 有 MP3 文 
件 ， 并 将 这 些 文件 读 取 到 缓冲 区 中 等 待 发 送 。 代 码 如 下 : 


void CP2PView: :Onsoc (WPARAM wParam, LPARAM lParam) 


{ 
switch (lParam) 


| 


5 // 省 略 部 分 代码 

case FD READ: // 读 取 事 件 

char mingl="''; // 定 义 字符 准备 接收 命令 

recv(s2,ming1'1'0); // 接 收 命令 字符 

if(mingl && 'c') // 判 断 命令 字符 

{ 

Cstring strTmp="” F:\\ 音 乐 \\";» // 假 设 指定 目录 

strcat (strTmp.GetBuffer (0),"\\*.mp3"); // 连 接 后 缀 名 

findfile.FindFile (strTmp); // 查 找 文件 

while (findfile.FindNextFile()) 

{ 

str2=findfile.GetFilePath(); // 获 取 文 件 路 径 

CFile file(str2,CFile: :modeRead); // 创 建文 件 对 象 

int n=file.GetLength()-128; // 获 得 数据 帧 的 大 小 

CString filetitle=file.GetFileTitle(); // 获 取 文 件 标题 
char datal[n]={0}; // 定 义 数据 帧 缓冲 区 
mp3data.data=&datal7 // 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
file.Read (mp3data.data, n); // 读 取 数 据 帧 中 的 数据 到 缓冲 区 
file.Read(mp3data.mp3b,128) 7 // 读 取 MP3 标签 帧 中 的 数据 
send(sl, n,1,0); // 发 送 文件 数据 帧 大 小 


“3 ® 


第 10 章 P2P 网 络 播放 器 


send(sl，filetitle, sizeof (filetitle) ,0);// 发 送 文件 名 


send (sl, mp3data.data,n,0); // 发 送 MP3 数据 帧 数据 
send(sl, mp3data.mp3b,n,0); // 发 送 MP3 标签 帧 数据 
// 省 略 部 分 代码 


} 
在 代码 中 , 用 户 使 用 循环 结构 读 取 每 一 个 搜索 的 MP3 文件 , 并 将 相关 的 数据 发 送 到 请 
求 方 计算 机 。 
3. 接收 文件 数据 并 创建 文件 
当 请 求 方 计算 机 接收 到 数据 时 ， 程 序 会 首先 判断 用 户 是 否 希 望 保 存 接收 到 的 文件 。 若 
户 选择 保存 ， 则 应 该 按照 一 定 的 顺序 将 接收 到 的 数据 写 入 文件 中 。 否 则 ， 文 件数 据 将 被 
存放 于 临时 文件 中 。 主 要 代码 如 下 : 


void CP2PView: :Onsoc (WPARAM wParam, LPARAM lParam) 


switch (lParam) 


I // 省 略 部 分 代码 
case FD READ: // 读 取 事 件 
mp3 mp3data; // 定 义 MP3 结构 体 对 象 
Cstring str="F:\ 音 乐 \"; // 定 义 目录 字符 串 
CString name; // 定 义 命令 字符 串 
recv (sl,name.GetBuffer (0) ,sizeof (name),0) ; // 接 收文 件 标题 
strcat (strcat (str.GetBuffer (0) ,name) ; // 连 接 后 缀 名 


CFilefilel(str, 
CFile::modeRead|CFile: :modeCreate|CFile: :modeNoTruncate|CFile::typeBina 


ry); 
// 定 义 文件 对 象 并 关联 MP3 文件 
recv(s, (char *)n,1,0); // 接 收 数据 帧 大 小 值 
char datal[n]={0}; // 定 义 数据 帧 缓冲 区 
recv(sl, &datal,n, 0); // 接 收 数据 帧 数据 
recv (sl,& mp3data.mp3b,128,0); // 接 收 标签 帧 数据 
mp3data.data=&datal; // 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
file.Write (mp3data.data,n); // 写 入 数据 帧 中 的 数据 到 缓冲 区 
file.Write (mp3data.mp3b, 128); // 写 入 MP3 标签 帧 中 的 数据 
// 省 略 部 分 代码 


在 代码 中 , 用 户 首先 接收 文件 名 并 在 指定 目录 中 创建 MP3 文件 。 然 后 ， 按 照 顺序 接收 
MP3 文件 的 数据 帧 以 及 标签 帧 并 将 其 写 入 文件 中 。 当 用 户 将 所 有 数据 写 入 文件 后 ， 需 要 将 
该 文件 的 相关 信息 添加 到 播放 列表 中 。 代 码 如 下 : 


355 // 省 略 部 分 代码 
int nRow=m 1ist.InsertItem(m 1ist.GetItemCount ()+1，mp3data.mp3b.title) 7 
// 插 入 行 
m list.SetItemText (nDRow,1，mp3data.mp3b.arti); // 设 置 数据 
if (mp3data.mp3b.heade && "TAG") // 判 断 是 否 为 MP3 文件 
Cstring mp3="MP3"; // 定 义 并 初始 化 字符 串 
m list.SetItemText (nRow,2,mp3); // 设 置 数 据 


} 
m list.SetItemText (nRow, 3, file.GetFilePath () ) ; / /添加 文件 路 径 
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外 注意 : 用 户 编程 时 ， 在 接收 文件 数据 或 将 其 写 入 文件 时 ， 都 应 该 严格 按照 对 方 读 取 文件 
数据 和 发 送 文件 数据 时 的 顺序 进行 。 否则 ， 数 据 顺 序 将 发 生 错 乱 。 
10.5 使 用 多 线程 进行 数据 传输 与 播放 


由 于 程序 在 发 送 查询 命令 后 ， 会 等 待 另 一 方 计 算 机 的 数据 。 而 在 这 一 段 时 间 中 ， 程 序 
将 一 直 处 于 等 待 状态 ， 如 果 此 时 程序 没有 任何 反应 ， 那 么 用 户 会 认为 程序 死 锁 了 。 为 了 避 
免 这 种 情况 的 发 生 ， 用 户 在 编写 程序 时 ， 可 以 利用 多 线程 编程 来 解决 这 个 问题 。 


10.5.1 发送 线程 


用 户 在 实例 程序 中 ， 需 要 创建 一 个 线程 用 于 发 送 数据 。 首 先 ， 用 户 需要 在 视图 头 文件 
中 定义 线程 函数 Senddata0， 代 码 如 下 : 


// 省 略 部 分 代码 
DWORD WINRPI Senddata (LPVOID lpParameter); // 声 明 线程 函数 
class CP2PView : public CFormView 
{ 

// 省 略 部 分 代码 


在 代码 中 ， 声 明 线 程 函数 Senddata0 时 ， 必 须 将 其 声明 在 类 外 。 否 则 ， 线 程 函 数 将 调 
用 失败 。 然 后 ， 用 户 需 要 实现 该 线程 函数 的 功能 。 实 现代 码 如 下 : 


DWORD WINAPI Senddata (LPVOID lpParameter) 


CString strTmp=”F:\\ 音 乐 \\"; // 假 设 指定 目录 
strcat (strTmp.GetBuffer (0),"\\*.mp3"); // 连 接 后 级 名 
findfile.FindFile (strTmp); // 查 找 文件 
while (findfile.FindNextFile()) // 查 找 下 一 个 文件 
{ 
str2=findfile.GetFilePath(); // 获 取 文 件 路 径 
CFile file(str2,CFile: :modeRead); // 创 建文 件 对 象 
int n=file.GetLength()-128; // 获 得 数据 帧 的 大 小 
CString filetitle=file.GetFileTitle(); // 获 取 文 件 标题 
char datal[n]={0}; // 定 义 数据 帧 缓冲 区 
mp3data.data=&datal; // 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
file.Read (mp3data.data,n); // 读 取 数 据 帧 中 的 数据 到 缓冲 区 
file.Read (mp3data.mp3b,128); // 读 取 MP3 标签 帧 中 的 数据 
send(sl, n,1,0); // 发 送 文件 数据 帧 大 小 
send(sl，filetitle, sizeof (filetitle),0);// 发 送 文 件 名 
send(sl, mp3data.data,n,0); // 发 送 MP3 数据 帧 数据 
send (sl, mp3data.mp3b,n,0); // 发 送 MP3 标签 由 数据 
return 1; 


} 


最 后 , 用 户 需要 在 套 接 字 的 读 取 事件 FD_READ 中 , 使 用 函数 CreateThreadO 创 建 发 送 
线程 发 送 文 件数 据 即 可 。 代 码 如 下 : 
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void CP2PView: :Onsoc (WPARAM wParam, LPARAM lParam) 
这 

Switch (lParam) 
{ 


ie // 省 略 部 分 代码 
Case FD READ: 
char mingl=""; // 定 义 字符 准备 接收 命令 
recv(s2,mingl,1,0); // 接 收 命令 字符 
if(mingl && 'c') /7 判断 命令 字符 


{ 

::CreateThread (NULL,0，Senddata, NULL, 0, NULL) ; // 创 建 线程 
break; 

1 

} 

这 样 , 用 户 便 通 过 函数 CreateThread0 创 建 了 发 送 线程 ， 当 线程 函数 Senddata0 启 动 时 ， 
首先 接收 对 方 发 送 的 命令 字符 并 判断 。 如 果 是 正确 的 命令 字符 ， 则 启动 线程 函数 搜索 文件 
并 发 送 文 件 。 否 则 ， 程 序 将 准备 接收 对 方 发 送 的 文件 数据 并 创建 文件 保存 数据 。 在 10.5.2 
节 中 ， 将 向 用 户 介绍 用 多 线程 程序 对 数据 进行 接收 保存 。 


10.5.2 ”接收 线程 


用 户 在 实例 程序 中 ， 使 用 接收 线程 接收 数据 将 节省 系统 资源 。 接 收 线程 也 需要 声明 接 
收 线程 函数 和 实现 接收 线程 函数 ,最 后 使 用 函数 CreateThread0 启 动 该 线程 。 其 方法 与 发 送 
线程 的 方法 相同 ， 所 以 在 这 里 本 节 将 不 再 袭 述 ， 请 用 户 参 考 10.5.1 节 的 内 容 。 在 接收 线程 
函数 中 ， 主 要 根据 用 户 的 选择 决定 是 否 保存 接收 到 的 文件 数据 。 代 码 如 下 : 


DWORD WINAPI Recvdata (LPVOID lpParameter) 
下 


mp3 mp3data; // 定 义 MP3 结构 体 对 象 
Cstring str="F:\ 音 乐 \"; // 定 义 目录 字符 串 
CString name; // 定 义 命令 字符 串 
recv (sl,name.GetBuffer (0), sizeof (name) ,0); // 接 收文 件 标题 
strcat (strcat (str.GetBuffer (0) ,name); // 连 接 后 缀 名 


CFilefilel(str, 
CFile: :modeRead|lCFile: :modeCreate|CFile: :modeNoTruncate|lCFile: :typeBina 


ry); 
// 定 义 文件 对 象 并 关联 MP3 文件 
recv(s, (char *)n,1,0); // 接 收 数据 帧 大 小 值 
char datal[n]={0}; // 定 义 数据 帧 缓冲 区 
recv (sl, gdatal,n, 0); // 接 收 数据 帧 数据 
recv(s1,& mp3data.mp3b, 128,0); // 接 收 标签 帧 数据 
mp3data.data=&datal; // 将 数据 首 地 址 赋予 MP3 数据 帧 成 员 
if (GetDlgItem(IDC_RADIO1) ->GetCheck() ) // 判 断 用 户 是 否 选 择 保存 文件 
{ 
file.Write (mp3data.data,n); // 写 入 数据 帧 中 的 数据 到 缓冲 区 
file.Write (mp3data.mp3b, 128); // 写 入 MP3 标签 帧 中 的 数据 
int ee .InsertItem(m list.GetItemCount()+1, mp3data.mp3b.title); 
// 插 入 行 
m list.SetItemText (nRow, 1，mp3data.mp3b.arti); // 设 置 数据 
if (mp3data.mp3b.heade && "TAG") // 判 断 是 否 为 MP3 文件 


{ 
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Cstring mp3="MP3"7 // 定 义 并 初始 化 字符 串 
m list.SetItemText (nRow, 2, mp3); // 设 置 数据 
} 
m list.SetItemText (nRow, 3, file.GetFilePath() ) ; / /添加 文件 路 径 
file.Close(); // 关 闭 文件 
} 


然后 ， 用 户 便 可 以 在 套 接 字 的 读 取 事件 中 ， 调 用 函数 CreateThreadO 启 动 接收 线程 了 。 
代码 如 下 : 


void CP2PView: :Onsoc (WPARAM wParam, LPARAM lParam) 


Switch (lParam) 


二 // 省 略 部 分 代码 
case FD READ: 
char mingl=' 7 // 定 义 字符 准备 接收 命令 
recv(s2,mingl,1,0); // 接 收 命令 字符 
if(mingl && 'c') // 判 断 命令 字 符 
1 
// 省 略 发 送 线程 的 部 分 代码 


} 

else 

| 

::CreateThread (NULL, 0，Recvdata, NULL, 0, NULL) ; / /创建 接收 线程 
break; 

} 

. 

到 这 里 为 止 ， 用户 已 经 实现 了 全 部 的 代码 编写 。 保 存 并 编 
译 运行 程序 ， 用 户 在 界面 中 单 击 “查找 网 络 文件 ”按钮 ， 程 序 
将 发 送 查 询 命令 字符 。 如 果 客 户 机 查询 成 功 , 则 返回 文件 数据 ， 
如 图 10.24 所 示 。 否则 , 程序 将 向 连接 到 该 台 客户 机 的 所 有 P2P 
客户 机 ， 发 送 查询 命令 并 使 用 异步 套 接 字 消息 响应 函数 等 待 接 
收 数据 。 

如 图 10.24 所 示 , 用 户 选择 了 保存 搜索 到 的 网 络 MP3 文件 ， 
并 且 将 这 些 文件 保存 在 路 径 为 “F:\ 音 乐 12” 的 目录 中 。 同 时 ， 
用 户 也 可 使 用 实例 程序 播放 这 些 通过 网 络 接收 的 文件 。 请 用 户 10.24 ”使 用 网 络 查找 


a ne | +-s| rs 


参照 书本 中 所 讲 的 理论 知识 并 结合 随 书 光盘 中 的 实例 代码 进行 MP3 文 件 
学 习 。 
10.6 小 结 


通过 本 章 学 习 ， 用 户 应 该 掌握 基于 P2P 所 编写 程序 的 基础 知识 。 本 章 主要 向 用 户 讲述 
了 在 VC 中 怎样 实现 P2P 程序 、 搜 索 网 络 MP3 文件 以 及 本 地 MP3 文件 的 相关 方法 。 
和 注意: 用 户 在 调试 随 书 光盘 中 实例 程序 时 ， 需 要 运行 多 个 实例 程序 ， 并 且 需 要 手动 将 代 
码 中 的 服务 器 套 接 字 和 客户 端 套 接 字 地 址 结构 中 的 端口 成 员 修改 为 相同 。 否 则 ， 
程序 之 间 将 不 能 实现 通信 。 


.314 。 
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用 户 在 日 常生 活 中 ， 最 常用 的 即时 通信 软件 应 该 是 QQ 聊天 软件 了 。QQ 软件 以 其 独 
特 的 功能 与 丰富 的 程序 界面 获得 了 很 多 用 户 的 青睐 。 所 以 ， 在 本 章 中 将 向 用 户 介绍 怎样 在 
VC 环境 下 ， 制 作 仿 QQ 实例 程序 界面 的 原理 及 其 方法 。 


11.1 界面 设计 


在 引言 中 向 用 户 提 到 了 QQ 之 所 以 受到 很 多 用 户 的 青睐 ， 最 大 的 原因 在 于 其 丰富 的 程 
序 界面 。 所 以 ， 在 本 节 中 ， 将 向 用 户主 要 介绍 服务 器 端 和 客户 端的 界面 程序 设计 方法 。 特 
别 是 实例 程序 的 窗口 界面 等 需要 与 QQ 真实 界面 大 致 相同 ， 需 要 用 户 具有 十 分 娴熟 的 界面 
设计 功底 。 


11.1.1 服务 器 端 


在 实例 程序 的 服务 器 端 ， 主 要 功能 是 显示 客户 端的 连接 情况 和 接收 到 的 数据 等 信息 。 
因此 , 在 VC 中 , 使 用 MFC 应 用 程序 向 导 创建 基于 对 话 框 类 型 的 实例 工程 ， 并且 在 对 话 框 
面板 中 添加 相应 的 子 控件 ， 以 丰富 界面 的 功能 。 


1. 创建 实例 工程 


用 户 在 VC 中 ， 创 建 Q 版 实例 工程 。 其 步骤 如 下 : 
(1) 选择 “文件 ” |“ 新建” 命令 ， 打 开 “ 新 建 ”对 话 框 ， 如 图 11.1 所 示 。 


文件 工程 | 工作 区 | 其 它 文档 | 


工程 名 称 叫 : 
三 00 径 序 服 务 器 


位 置 [ch: 
[ER 洒 市 净 吕 Mi2\ 访 00 程 序 \ 仿 c .| 


6 创建 新 的 工作 空间 四 
人 活 加 到 当前 工作 宝 间 | 


EL 


Win32 kLib 
司 winaz Siatic Library 


图 11.1 新 建 工 程 对 话 框 
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用 户 在 新 建 工程 对 话 框 中 ， 可 以 在 “工程 ”选项 卡 中 ， 设 置 新 建 工 程 的 类 型 为 MFC 
AppWizard[exe]。 然 后 ， 在 相应 的 编辑 框 中 ， 修 改 工程 名 为 “ 仿 QQ 程序 服务 器 ”以 及 工 
程 路 径 。 

(2) 单 击 “ 确 定 ” 按 钮 ， 选 择 应 用 程序 类 型 为 “基本 对 话 框 ”。 单 击 “ 下 一 步 ” 按 
钮 ， 选 择 应 用 程序 的 相关 设置 信息 ， 如 图 11.2 所 示 。 


了 FEC 应 用 程序 向 导 - 步 划 2 共 4 步 
您 是 否 希 望 包 含 : 
厂 " 哄 于 "对 话 框 
厂 上 下 文 相关 帮助 
F 3D 外 观 
您 希望 包含 什么 其 他 支持 ? 
厂 自动 操作 岂 
F ActiveX 控件 [C] 
您 希望 包含 WOSA 支持 吗 ? 


v Windows Sockets [W] 


对 话 框 的 标题 是 ， 
仿 00 程 序 


《上 一 步 | 下 一 步 > 完成 
图 11.2 设置 应 用 程序 的 相关 信息 


用 户 在 应 用 程序 设置 中 ， 必 须 选择 Windows Sockets 复 选 框 。 因 为 该 实例 程序 需要 网 
络 套 接 字 的 相关 库 的 支持 ， 才 能 通过 网 络 进行 通信 。 和 否则 ， 用 户 只 能 在 编写 代码 时 ， 手 动 
添加 相关 代码 。 单 击 “ 下 一 步 ” 按 钮 ， 选 择 生成 源 文件 备注 ， 如 图 11.3 所 示 。 


MFC 应 用 程序 向 导 - 步 票 3 共 4 步 


您 喜欢 的 风格 是 : 

= BEE 

个 Windows 资源 管 理 改 辞 式 
您 希望 生成 源 文件 备注 吗 ? 


6 是 MM 
5 否 四 


您 希望 使 用 MFC 库 吗 ? 
作为 共享 的 DLL 
个 作为 静态 的 DLL 


sn | 


图 11.3 生成 源 文 件 备注 
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设置 完毕 以 后 ， 用 户 可 以 直接 单 击 “完成 ”按钮 ， 完 成 服务 器 实例 工程 的 创建 。 
2. 服务 器 界面 设计 


首先 ， 用 户 在 对 话 框 面板 中 ， 使 用 鼠标 拖 入 一 个 列表 控件 并 将 其 拖拉 到 合适 大 小 。 该 
列表 控件 主要 用 于 显示 当前 连接 到 服务 器 的 用 户 昵 称 、IP 地 址 等 相关 信息 , 如 图 11.4 所 示 。 


嘿 仿 8q 竹 序 服务 委 [x| 


11.4 调整 后 的 实例 界面 


但 是 , 用 户 在 真正 使 用 该 实例 程序 时 , 常常 需要 在 服务 器 端 向 指定 的 客户 端 发 送 消息 。 
因此 , 用 户 还 需要 在 工程 中 添加 一 个 消息 发 送 对 话 框 。 该 对 话 框 是 在 用 户 发 送 消息 时 弹出 。 

在 VC 主 界面 中 ， 选 择 “ 插 入 ”|“ 资 源 ”命令 ， 即 可 弹出 插入 资源 对 话 框 ， 如 图 11.5 
所 示 。 


Qs Accelerator 新 建 叫 
图 Bitmap 
田 人 Cursor 
HTML 
国 Icon 


昌 Menu 

ans String Table 
型 Toolbar 
Version 


图 11.5 插入 资源 对 话 框 


用 户 在 该 对 话 框 中 ， 选 择 资源 类 型 为 Dialog。 然 后 单 击 “ 新 建 ” 按 钮 ， 程 序 将 在 实例 
工程 中 新 建 一 个 对 话 框 。 消 息 对 话 框 添 加 成 功 后 ， 用 户 可 以 编辑 该 对 话 框 界面 以 达到 实用 
效果 ， 如 图 11.6 所 示 。 


“317。 
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客户 号 码 : ”| 编辑 
IP 地 址 ， | 编辑 


上 


也 


图 11.6 消息 对 话 框 界面 


在 消息 对 话 框 界面 中 ， 可 以 向 用 户 显示 连接 客户 端的 号 码 、IP 地 址 等 信息 。 其 中 控件 
ID 以 及 功能 等 如 表 11.1 所 示 。 


表 11.1 消息 对 话 框 界面 中 各 控件 的 ID 以 及 作用 


控件 ID 控件 作用 

IDC NUM 显示 客户 端 号 码 

IDC PP 显示 客户 端 IP 

IDC TEXT 显示 客户 端 所 发 送 的 信息 
IDC TEXT2 发 送 到 客户 端的 信息 
IDC RELAY 用 于 回复 客户 端 消息 
IDC_SEND 发 送信 息 


3. 为 对 话 框 资源 关联 新 类 


用 户 在 实例 工程 中 ， 使 用 新 建 对 话 框 前 ， 必 须 为 其 关联 一 个 新 类 。 和 否则 ， 用 户 将 不 能 
使 用 该 对 话 框 。 首 先 ， 在 VC 环境 下 ， 使 用 快捷 键 Ctl+W 弹出 MFC 向 导 对 话 框 的 同时 将 
弹出 Adding a Class 对 话 框 ， 如 图 11.7 所 示 。 用 户 选择 第 一 个 选项 ， 表 示 创 建 一 个 新 类 。 
然后 单 击 OK 按钮 ， 将 弹出 New Class 对 话 框 ， 如 图 11.8 所 示 。 


Adding a Class 


IDD_DIALOG1 is a new resource. Since itisa 
dialog resource you probably want to create a 
new class for it. You can also select an 
existing class. 


广 Select an existing class 


图 11.7 Adding a Class 对 话 框 
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Class information 


Name: CMessage| 


File name: Message.cpp 


Change... 


Base class: CDialog 


Dialog ID: IDD_DIALOG1 


Automation 
® None 
CT Automation 


C Createable by type ID. 


图 11.8 New Class 对 话 框 


在 该 对 话 框 中 ， 用 户 可 以 修改 新 类 名 及 其 基 类 名 等 。 在 本 章 中 ， 将 新 类 名 指定 为 
CMessage， 将 其 基 类 名 指定 为 CDialog。 然 后 ， 单 击 OK 按钮 完成 新 类 的 添加 。 


4. 服务 器 界面 初始 化 


在 服务 器 端 ， 界 面 初始 化 包括 了 主 对 话 框 以 及 消息 显示 对 话 框 界面 的 初始 化 。 下 面 将 
分 别 向 用 户 讲解 程序 界面 的 初始 化 。 

首先 ， 当 服务 器 程序 启动 时 ， 程 序 应 该 将 列表 控件 的 各 个 标题 显示 出 来 。 所 以 ， 用 户 
在 实例 窗口 的 初始 化 函数 OnInitDialog0 中 , 应 该 使 用 列表 控件 类 的 相关 函数 对 标题 进行 设 
置 。 代 码 如 下 : 


BOOL CQQD1g::OnInitDialog() 


CDialog: :OnInitDialog(); 

Ee // 省 略 部 分 代码 
LVCOLUMN lv; // 定 义 列表 结构 体 变量 
Vv.mask=LVCF_TEXT|LVCF_FMT|LVCF_WIDTH; // 初 始 化 结构 体 各 个 成 员 
TV-fmt=LVCEMT CENTER; 


V.pszText=" 用 户 号 码 "; // 设 置 列表 标题 
V.cx=120; // 指 定 该 列 宽度 
m list.InsertColumn (0, &1v); // 插 入 指定 列 
lv.pszText="IP 地 址 "; // 修 改 列 标题 
m list.InsertColumn (1,&1v); // 插 入 指定 列 
V.pszText=" 用 户 类 型 "; // 修 改 列 标题 
m list.InsertColumn (2,&lLv) // 插 入 指定 列 
有 


用 户 已 经 完成 了 对 主 对 话 框 界面 的 初始 化 工作 了 , 保存 并 编译 运行 程序 ， 如 图 11.9 所 
示 。 然 后 ， 消 息 对 话 框 的 初始 化 工作 主要 为 界面 中 的 控件 状态 及 其 显示 内 容 的 初始 化 。 其 
中 ， 控 件 状态 的 显示 效果 如 图 11.10 所 示 。 
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人 仿 QQ 程 序 服务 器 


当前 在 线 用 户 以 及 所 发 送 消息 ( 驱 击 列表 项 可 发 送 消息 ) 


用 户 导 码 地 二 用 户 类 型 
图 11.9 主 对 话 框 界面 初始 化 图 11.10 消息 对 话 框 界面 初始 化 
用 户 在 程序 中 ， 实 现 消息 对 话 框 初始 化 的 代码 如 下 : 
BOOL CMessage::OnInitDialog() // 消 息 对话 框 初始 化 函数 
{ 
CDialog: :OnInitDialog(); 
GetDlgItem(IDC NUM)->EnableWindow (false); // 禁 用 客户 端 号 码 编辑 框 
GetDlgItem(IDC IP)->EnableWindow (false); // 禁 用 IP 地 址 编辑 框 
GetD1gItem(IDC TEXT) ->EnableWindow (false); // 禁 用 消息 显示 框 
GetDlgItem(IDC TEXT2)->ShowWindow (false) // 隐 藏 消息 发 送 框 
GetDlgItem(IDC SEND)->ShowWindow (false); // 隐 藏 发 送 按钮 
// 省 略 部 分 代码 


return TRUE; 
} 


接 下 来 ， 用 户 需 要 在 消息 对 话 框 类 CMessage 中 为 各 个 子 控 件 添加 相应 的 变量 ， 以 实 
现 当 程序 初始 化 时 ， 便 于 设置 各 个 控件 的 显示 内 容 。 在 VC 中 添加 成 员 变 量 的 方法 是 使 用 
快捷 键 CrtlHW， 打 开 应 用 程序 向 导 对 话 框 的 选项 卡 Member Variables， 如 图 11.11 所 示 。 


了 EC ClassWizard 
Message Maps Member Variables | Automation | Activex Events | Class Info | 


Project: Class name: i 
[ 俩 oa 程 序 服务 器 司 图 [cvessaoe 人 
EMMessage.h, EX.WMessage.cpp 人 
Control IDs: Type Member Defete Variable 


Add Variable... 


Updat 


Description: 


图 11.11 添加 成 员 变量 属性 页 
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用 户 在 该 属性 页 中 ， 可 以 为 消息 对 话 框 中 的 子 控件 关联 相应 的 控件 变量 。 例 如 ， 为 控 
件 IDC_IP 添加 相应 控件 变量 的 方法 是 ， 在 Control IDs 列表 中 选择 IDC_IP,， 然后 单 击 Add 
Variable 按钮 。 此 时 ， 程 序 将 弹出 Add Member Variable 对 话 框 ， 如 图 11.12 所 示 。 


Member variable name: 
m_ip| 
Cancel 
Category: 
Value bd 
Variable type: 
int 中 | 


Description: 
int with validation 


图 11.12 Add Member Variable 对 话 框 


在 该 对 话 框 中 ， 用 户 在 第 一 个 编辑 框 中 输入 控件 变量 的 名 称 ， 当 选择 好 变量 类 型 后 ， 
单 击 OK 按钮 添加 控件 变量 成 功 。 


全 注意 : 由 于 在 消息 对 话 框 程序 中 ， 添 加 控件 变量 的 方法 都 是 一 样 的 。 所 以 ， 为 其 他 控件 
关联 变量 的 方法 也 是 一 样 ， 在 本 节 中 不 再 向 用 户 进行 鞭 述 。 


通过 本 节 ， 用 户 基 本 完成 了 服务 器 界面 的 初始 化 工作 。 关 于 其 他 功能 的 实现 ， 将 在 后 
面 的 内 容 中 向 用 户 进 行 讲述 。 


11.1.2 ”客户 端 


在 客户 端 实例 中 ， 实 例 程序 的 界面 应 该 与 QQ 的 界面 相似 。 因 此 ， 在 VC 中 新 建 一 个 
工程 ， 修 改 工 程 名 为 “ 仿 QQ 程序 客户 端 ”。 而 其 他 设置 均 与 服务 器 端 一 样 。 


1. 客户 端 界面 设计 


用 户 可 以 在 对 话 框 资源 编辑 器 中 ， 将 窗口 拖 放 到 与 QQ 窗口 同样 大 小 ， 如 图 11.13 所 
示 。 但 是 ， 用 户 在 实际 使 用 该 实例 时 ， 常 常 需要 使 用 鼠标 将 窗口 拉 大 或 者 是 拉 小 。 为 了 使 
程序 运行 时 具有 该 功能 ， 用 户 可 以 右 击 对 话 框 面板 ， 在 弹出 的 快捷 菜单 中 选择 “属性 ” 命 
令 ， 弹出“ 对话 属性 ”对 话 框 ， 如 图 11.14 所 示 。 

用 户 在 该 对 话 框 中 ， 选 择 “样式 ”选项 卡 ， 在 边框 下 拉 列 表 框 中 选择 “调整 大 小 ” 选 
项 。 当 客户 端 实例 运行 时 ， 用 户 便 可 以 使 用 鼠标 对 窗口 进行 缩放 了 。 请 用 户 参考 随 书 光盘 
中 的 实例 代码 。 

现在 ， 用 户 可 以 在 VC 的 资源 管理 器 中 ， 为 客户 端 主 窗口 添加 相应 的 功能 控件 。 添 加 
控件 后 的 界面 效果 如 图 11.15 所 示 。 
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仿 Qq 程 序 区 


QQ 程 订 客户 端 


六 时 常规 样式 | 更 多 样式 | 扩展 样式 | 更 多 扩展 样式 | 


样式 (Sj: F 标题 栏 四 厂 剪贴 同 层 加 
弹出 也 系统 菜单 三 剪贴 下 层 四 
厂 景 小 化 框 厂 水 平 滚动 加 
厂 最 大 化 框 凶 厂 垂直 流动 邮 


图 11.13 客户 端 窗 图 11.14 “对 话 属性 ”对 话 框 11.15 添加 
口 初始 化 大 小 控件 后 的 客户 端 界面 


其 中 ， 添 加 的 控件 ID、 类 型 以 及 作用 等 如 表 11.2 所 示 。 
表 11.2 控件 ID、 类 型 以 及 作用 


控件 ID 控件 作用 
IDC_LISTI 显示 好 友 
IDC_EMAIL QQ 邮件 
IDPC NET QQ 网 页 


用 户 添 加 控件 成 功 以 后 ， 为 了 使 添加 的 控件 能 随 窗口 的 大 小 改变 而 改变 。 该 功能 应 该 
在 窗口 类 的 函数 OnSize0 中 实现 ， 代 码 如 下 : 
void CQQD1g: :OnSize(UINT nType, int cx, int cy) 


{ 
CDialog: :OnSize (nType, cx, cy); 
RECT rect; // 定 义 结构 体 变 量 
::GetWindowRect (m hWnd, grect); // 获 取 窗 口 的 大 小 
GetDlgItem(IDC LIST1) ->MoveWindow (grect,true); // 根 据 窗口 的 大 小 移动 控件 
GetDlgItem(IDC EMAIL) ->MoveWindow (grect, true); 
GetDlgItem(IDC NET)—->MoveWindow(&rect,true); 
} 


当 窗 口 的 大 小 发 生变 化 时 ， 程 序 会 调用 该 函数 进行 处 理 。 通 过 以 上 代码 ， 用 户 实现 了 
控件 随 窗 口 的 大 小 改变 而 改变 。 


2. 显示 QQ 图 标 


为 了 使 实例 程序 与 真实 QQ 的 效果 一 样 ， 用 户 可 以 在 程序 中 添加 一 个 QQ 图 标 。 其 方 
法 如 下 : 


= 
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(1) 在 实例 工程 中 ， 添 加 一 个 图 标 资源 。 选 择 “ 插 入 ”| “资源 ”命令 ， 弹 出 “插入 
资源 ”对 话 框 ， 如 图 11.16 所 示 。 


资源 类 am | am 


eAccelerator 
图 Bitmap 引入 IM)... 
下 入 Cursor Cl 
5 国 Dialog 自 定义 [OQ).. 
国 HTML 
BC J 
双 Menu 
ks String Table 
可 Toolbar 
回 Version 


图 11.16 插入 资源 对 话 框 


用 户 选中 资源 类 型 列表 中 的 选项 Icon， 再 单 击 “ 引 入 ”按钮 ， 选 择 并 插入 图 标 文件 即 
可 。 在 VC 资源 管理 器 的 图 标 项 中 ， 用 户 可 以 查看 刚 添加 的 图 标 文件 ， 如 图 11.17 
所 示 。 
仿 9q 程 序 - Wicrosoft yisual C++ - [ 仿 QQ 程 序 .rc - IDR_WAINFRAWE (Icon)] 思拓 | 民 ] 
| 国文 件 四 编 缉 @) 查看 WD 插入 CD) 工程 和 组建 图像 如 工具 人 I) 窗口 mW 帮助 0 
"| | 
members|[z][ OnButon2 习作 "| 多 尚 关 1 国 
3 设备 (Qj: [32x32.255 色 ”名 | 


由 a String Table 


# Version 


图 11.17 刚 插 入 的 图 标 资源 


(2) 用 户 可 以 将 该 图 标 文件 的 名 称 修改 为 IDR_ MAINFRAME， 并 且 在 对 话 框 类 
CQQDlg 的 初始 化 函数 中 调用 函数 载 入 该 图 标 资源 到 程序 中 。 代 码 如 下 : 


CQQD1g: :CQOQD1g (CWnd* PParent /*=NULL*/) 


ee 


第 2 篇 ”Visual C++ 网 络 编程 典型 应 用 


: CDialog (CQQD1g::IDD, pParent) // 对 话 框 类 的 初始 化 函数 
{ 

m hIcon = AfxGetApp() ->LoadIcon (IDR MAINFRAME) ; // 载 入 图 标 资源 
| 


(3) 在 对 话 框 的 初始 化 函数 OnmitDialog0 中 ， 调 用 函数 SendMessage() 向 主 窗口 发 送 
消息 WM_SETICON 设置 该 对 话 框 的 图 标 。 代 码 如 下 : 
BOOL CQQD1g: :OnInitDialog() // 对 话 框 初始 化 函数 
{ 
CDialog: :OnInitDialog(); 
SetIcon(m hIcon, TRUE); 


SetIcon(m hIcon, FALSE); 
: :SendMessage (this->m hWnd,WM SETICON,0, (unsigned int)m hIcon); 


// 向 对 话 框 发 送 设置 图 标的 消息 
return TRUE; 
} 
(4) 用 户 保存 ， 并 且 编 译 运 行程 序 ， 结 果 如 图 11.18 所 示 。 
到 这 里 为 止 ， 用 户 已 经 成 功 地 为 应 用 程序 添加 了 QQ 图 标 。 


3. 列表 控件 初始 化 


当 实 例 程序 启动 时 ， 列 表 控 件 的 初始 化 工作 主要 是 显示 列表 控件 的 标题 以 及 好 友 列 
表 。 所 以 , 用 户 需 要 在 实例 工程 中 插入 位 图 资源 , 并 将 其 命名 为 IDB_BITMAP1, 如 图 11.19 
所 示 。 


点 99 程 序 客 户 端 。 出] 


日 于 仿 oo 程序 pr 


对 
ma 
SBitmap Ea 
[1D8_BTMAP1 AA 
图 1DB_BITMAP?| a 

# Dialog 
-所 Icon 所 天 可 
国 IDR_MAINFRA 口 国 四 
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图 11.18 设置 实例 程序 的 图 标 图 11.19 插入 的 位 图 资源 
位 图 资源 插入 成 功 后 ， 用 户 便 可 以 在 对 话 框 初始 化 函数 中 添加 代码 。 代 码 如 下 : 


BOOL CQQD1g: :OnInitDialog() 
{ 
CDialog: :OnInitDialog(); 


2 // 省 略 部 分 代码 
CImageList *img; // 定 义 图 像 列表 指针 
img=new ClImageList(); // 创 建 图 像 列表 对 象 


“324。 
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img->Create (32,32,ILC COLOR4,3,2); 


img->Add (gm bit,RGB(255,0,255)); // 向 图 像 列表 中 添加 图 像 

LVCOLUMN lv; // 定 义 列表 结构 体 变量 
lv.mask=LVCE TEXT1LVCE EMT1LVCE WIDTHILVIF IMAGE; 

/ /初始化 该 结构 体 中 的 成 员 

1v.fmt=LVCFMT CENTER; 
lv.pszText=" 好 友 列 表 "; // 设 置 列表 标题 
lv.cx=140; // 指 定 该 列 宽度 
m list.InsertColumn(0, &lv); // 插 入 列表 标题 
m list.SetImageList (img, LVSIL SMALL); // 设 置 图 像 列 表 


CString str[7]; 

for (int i=0;i<7;i++) 

€ 

recv (s,str[i] .GetBuffer (1), sizeof (str[i]),NULL) ;// 接 收服 务 器 发 送 的 好 友 列 表 
m list.InsertItem(i, str[i],i); // 向 列表 控件 中 添加 项 目 

} 

return TRUE; 

} 


在 代码 中 ,函数 SettmageListO) 的 作用 是 将 图 像 列表 以 指定 方式 显示 到 列表 控件 中 。 其 
原型 如 下 : 


CImageList* SetImageList( CImageList* pImageList, int nImageList ); 


该 函数 有 两 个 参数 。 其中, 参数 pImageList 指向 CImageList 类 的 指针 ; 参数 nImageList 
表示 显示 的 方式 ， 其 值 如 表 11.3 所 示 。 


表 11.3 图 像 列表 在 列表 控件 中 的 显示 方式 


取 值 意 义 
LVSIL NORMAL 以 大 图 显示 
LVSIL SMALL 以 小 图 显示 
LVSIL STATE 以 固定 大 小 进行 显示 


用 户 将 上 面 的 代码 编译 、 运 行 后 ， 结 果 如 图 11.20 所 示 。 


避 9 程序 客户 端 ”区 


图 11.20 在 列表 中 显示 位 图 资源 


ss 
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4. 设置 对 话 框 背景 


用 户 可 以 从 资源 文件 中 ， 插 入 一 幅 位 图 作为 程序 界面 的 背景 ， 将 资源 ID 修改 为 
IDB_BITMAP2。 首 先 ， 在 对 话 框 类 中 声明 设备 句柄 dc1。 代 码 如 下 : 


class CQQD1g : public CDialog 
{ 
public: 
sa // 省 略 部 分 代码 
HDC dcl; // 声 明 设 备 句柄 
} 


然后 ， 在 函数 OnPaint0 中 ， 创 建 一 个 与 对 话 框 设备 环境 相 兼 容 的 DC 句柄 并 返回 。 利 
用 这 个 返回 的 兼容 设备 DC， 用 户 便 可 以 将 载 入 的 位 图 资源 放 入 该 兼容 DC 中 。 最 后 ， 调 
用 函数 StretchBltO 将 兼容 DC 中 的 位 图 资源 复制 到 对 话 框 的 实际 DC 中 显示 。 代 码 如 下 : 


void CQQD1g: :OnPaint () 
{ 


2 // 省 略 部 分 代码 

m_bit1.LoadBitmap (IDB BITMAP2); // 载 入 位 图 资源 

dcl=::CreateCompatibleDC (::GetDC (this->m hWnd));  // 创 建 兼容 DC 

::SelectObject (dcl,m bitl.m hObject); // 选 取 位 图 到 兼容 DC 中 

: :StretchBlt(: :GetDC (this->m_hwnd),0,0,500,650,dcl,0,0,300,300,SRCCOPY) 
// 复 制 位 图 资源 


} 


在 上 面 的 代码 中 ， 函 数 StretchBlt0 的 作用 是 将 兼容 DC 中 的 位 图 资源 直接 复制 到 对 话 
框 的 DC 中 。 该 函数 的 最 后 一 个 参数 SRCCOPY 表示 以 复制 方式 进行 传送 。 用 户 将 代码 进 
行 保存 、 编 译 并 运行 ， 如 图 11.21 所 示 。 


点 99 程序 客户 内 。” 攻 | 


图 11.21 设置 背景 图 片 的 对 话 框 
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在 这 里 ， 用 户 可 以 参考 随 书 光盘 中 实例 代码 ， 并 且 可 以 试 着 修改 代码 实现 控件 的 透明 
化 。 这 样 将 有 利 提高 用 户 的 学 习 质 量 。 


5. 添加 消息 发 送 对 话 框 


用 户 在 使 用 QQ 进行 网 络 通信 时 ， 当 双击 列表 中 的 项 目 时 ， 都 会 弹出 一 个 消息 发 送 对 
话 框 。 因 此 ， 在 本 实例 中 ， 用 户 实现 这 一 功能 需要 在 工程 中 添加 一 个 对 话 框 ， 并 关联 对 应 
的 新 类 。 

首先 ， 选择 “插入 ”|“ 资 源 ” 命 令 ,， 弹出 “插入 资源 ”对 话 框 ， 如 图 11.5 所 示 。 用 户 
在 该 对 话 框 中 ， 选 择 资源 类 型 为 Dialog 后 ， 单 击 “ 新 建 ” 按 钮 。 接 着 ， 用 户 在 VC 资源 管 
理 器 中 ， 编 辑 新 建 的 消息 发 送 对 话 框 以 实现 实际 功能 ， 如 图 11.22 所 示 。 


11.22 ”消息 发 送 对 话 框 界面 


然后 ， 用 户 还 必须 为 该 对 话 框 关联 一 个 新 类 才能 在 实例 程序 中 使 用 该 对 话 框 。 用 户 可 
以 使 用 快捷 键 Ctrl+W 弹出 MFC 应 用 程序 向 导 。 此 时 ， 编 译 器 会 弹出 Adding a Class 对 话 
框 ， 如 图 11.23 所 示 。 


Class name: Add Class,，~ 


到 


AddF 


IDD_DIALOG1 is a new resource. Since itis a 
要 dialog resource you probably want to create a 
IDC_LIST1 new class for it. You can also select an 
IDC_NET existing class. 


Member functions| “ Create anew class 

¥ DoDataExchal © Selectan existing class 

W OnCtiColor 

W oninitDialog we 

W onpPaint ON_WM_PAINT 

W OnQueryDraglcon ON_WM_QUERYDRAGICON 


Description: 


11.23 “Adding a Class” 对 话 框 


“a 
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在 图 11.23 中 , 用 户 选 择 Create a new class 单 选 按钮 后 , 单 击 OK 按钮 , 弹出 New Class 
对 话 框 ， 如 图 11.24 所 示 。 


-Class information 一 -一 
Name: CSend 
Cancel 


File name: Send.cpp 


Change... 


Base class: CDialog 


Dialog ID: IDD_DIALOG1 


Automation 
® None 
三 automation 


PC Createable by type ID 


图 11.24 New Class 对 话 框 


在 该 对 话 框 中 ， 用 户 可 以 修改 新 类 名 及 其 基 类 名 等 类 信息 。 单 击 OK 按钮 完成 新 类 的 
创建 。 
全 注意 : 用 户 在 实例 程序 中 ， 使 用 该 对 话 框 前 ， 必 须 在 程序 中 包含 该 对 话 框 类 的 头 文件 ， 
并 且 需 要 在 实例 程序 中 定义 该 对 话 框 类 的 实例 对 和 象 。 
本 节 主 要 向 用 户 讲解 了 实例 程序 中 ， 服 务 器 与 客户 端 界面 的 设计 以 及 消息 发 送 对 话 框 
界面 的 设计 等 。 


11.2 通信 数据 


在 本 节 中 ， 将 向 用 户 讲解 关于 服务 器 与 客户 端 之 间 传输 的 通信 数据 格式 和 主要 功能 的 
实现 方法 。 最 后 ， 将 这 些 功 能 以 及 数据 封装 在 CData 类 中 供用 户 使 用 。 


11.2.1 定义 通信 数据 结构 


一 般 情 况 下 ， 在 服务 器 与 客户 端 之 间 的 通信 数据 必须 具有 相同 的 数据 结构 。 这 样 ， 既 
能 保证 数据 的 完整 性 ， 又 能 使 这 些 数 据 具 有 良好 的 可 读 性 。 

首先 ， 用 户 需 要 分 析 该 实例 中 ， 对 于 通信 数据 而 言 ， 哪 些 是 比较 重要 的 。 在 本 章 中 向 
用 户 列 举 了 一 些 数据 ， 例 如 ， 客 户 端正 地址、 客户 昵称 等 。 

然后 ， 用 户 需要 将 这 些 数据 组 合 到 一 个 结构 体 中 。 代 码 如 下 : 


typedef struct qq str{ // 自 定义 QQ 数据 结构 体 


“3 
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char m name[50]; // 发 送信 息 客 户 昵称 

char m namel[50]; // 接 收 信息 客户 昵称 

int m addr; // 客 户 端 IP 地 址 

char msg[1024]; // 客 户 端 与 服务 器 的 通信 内 容 


Foqgstructs 


上 面 的 结构 体 qqstruct 已 经 基本 包含 了 本 实例 中 客户 端的 主要 数据 。 当 然 ， 用 户 在 实 
际 使 用 该 结构 时 ,在 服务 器 端 同样 需要 该 结构 体 。 所 以 , 用 户 在 构造 服务 器 端 数据 结构 时 ， 
需要 首先 定义 一 个 该 结构 变量 。 

另外 ， 服 务 器 端 为 了 将 接收 到 的 消息 转发 到 该 信息 真正 的 接收 方 ， 必 须 定义 第 二 个 结 
构 体 。 在 该 结构 体 中 包含 有 结构 体 qqstruct 变量 和 服务 器 端 调用 函数 acceptO 时 所 返回 的 通 
信和 套 接 字 。 结 构 如 下 : 


typedef struct q str{ // 服 务 器 转发 消息 数据 结构 
qqstruct qq; / /客户 端 数 据 结构 变量 
SOCKET s; // 消 息 接收 方 套 接 字 句柄 
}qqmsg; 


全 注意 : 在 服务 器 端 转发 消息 时 ,是 利用 接收 信息 方 客户 的 昵称 查找 相应 的 通信 套 接 字 的 。 


11.2.2 ”功能 实现 


在 本 节 中 ， 将 向 用 户 讲解 服务 器 端 以 及 客户 端的 各 个 功能 函数 的 实现 方法 。 在 这 些 功 
能 函数 中 ， 对 数据 结构 的 使 用 同样 也 是 非常 重要 的 一 个 知识 点 。 


1， 服务 器 功能 实现 


首先 ， 当 服务 器 启动 时 会 在 指定 端口 等 待 客户 端的 连接 。 如 果 连 接 成 功 ， 则 将 在 服务 
器 端 列表 控件 中 显示 客户 端的 相关 信息 。 代 码 如 下 : 


void CData: :bind() 


WSADATA data; // 定 义 结构 体 变量 
CString name; // 定 义 主机 名 字符 串 
DWORD ss=MAKEWORD (2,0); // 指 定 套 接 字 版 本 

::WSAStartup (ss, gdata); // 初 始 化 套 接 字库 
s=: :socket (AF_INET, SOCK_STREAM, IPPROTO TCP); 

// 创 建 套 接 字 
sockaddr in addr; // 定 义 地 址 结构 变量 


: :gethostname ( (char*) gname, (int) sizeof (name) ) ; // 获 得 主机 名 字 
hostent *p=::gethostbyname ( (char*) sname) ; // 从 主机 名 获取 主机 地 址 


in addr *a=(in addr*)*p->h addr list; // 获 得 本 机 IP 地 址 
CString str14=::inet ntoa(la[0]); // 转 换 字符 串 IP 地 址 
addr.sin family=AF INET; // 填 充 地 址 结构 
addr.sin port=htons (80); // 指 定 监听 端口 为 80 


adqdr.sin addr.s un.s addr=inet addr (str14) 7 // 指 定 主 机 IP 地 址 
::bind(s, (sockaddr*) gaddr, sizeof (addr) ); // 将 本 地 信息 绑 定 到 套 接 字 
Sieteon(tg ss // 监 听 

WSAAsyncSelect (s, this->m hWnd,WM SOCK,FD ACCEPTI|EFD READ); 
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// 将 套 接 字 设 置 为 异步 模式 
} 


在 程序 中 ， 用 户 使 用 函数 gethostname() 获 取 本 地 主机 名 ， 并 且 通 过 该 主机 名 得 到 相应 
的 了 P 地 址 信息 。 再 将 本 地 主机 的 相关 信息 绑 定 到 创建 的 套 接 字 上 , 并 将 该 套 接 字 设置 为 异 
步 模式 。 


全 注 意 : 在 本 节 中 向 用 户 讲解 的 各 个 功能 函数 均 为 自 定义 类 CData 的 成 员 函 数 。 关 于 该 类 
的 具体 封装 方法 将 在 11.2.3 节 中 具体 讲解 。 


然后 ， 用 户 在 程序 中 必须 定义 与 套 接 字 消 息 相 应 的 响应 函数 ， 并 且 使 用 消息 映射 宏 将 
套 接 字 消息 WM_SOCK 与 其 响应 函数 相关 联 才能 实现 套 接 字 的 异步 模式 用户 为 套 接 字 消 
息 添加 消息 映射 ， 代 码 如 下 : 


BEGIN MESSAGE MAP(COOD1g，CDialog) 
//{{AFX MSG MAP (CQQD1g) 
ON WM SYSCOMMAND() 
ON WM QUERYDRAGICON () 
ps // 省 略 部 分 消息 映射 项 
ON MESSRGE (WM SOCK, Onsoc) // 套 接 字 消 息 映射 
ON WM CTLCOLOR() 
ON WM TIMER () 
ON WM LBUTTONDOWN () 
//}}AFX MSG MAP 
END MESSAGE MAP() 


在 消息 映射 宏 中 , 用 户 可 以 看 到 与 套 接 字 消息 相关 联 的 函数 是 Onsoc()。 该 函数 的 声明 
代码 如 下 : 


class CQQD1g : public CDialog 
{ 
public: 
这 // 省 略 部 分 代码 
afx msg void Onsoc (WPARAM wParam, LPARAM lParam); “ // 声 明 套 接 字 消息 响应 函数 
} 


用 户 对 套 接 字 消 息 响应 函数 声明 以 后 ， 便 可 以 在 程序 中 实现 该 函数 。 代 码 如 下 : 


int i=0; // 定 义 全 局 变量 
qqstruct qq; // 定 义 结构 体 qqstruct 变量 
qqmsg msg[5]; // 定 义 结构 体 qqmsg 变量 
void CQQD1g::Onsoc (WPARAM wParam, LPARAM lParam) 
i 
switch (lParam) // 判 断 套 接 字 事件 
A 
case FD ACCEPT: // 套 接 字 连接 事件 
{ 
msg[i].s=::accept (s, NULL, NULL); // 保 存 客户 端 连接 时 返回 的 套 接 字 
if (i<5) / /判断 连接 的 客户 端 是 否 已 满 
1 
i+=1; 
由 
else 
{ 
i=0 
} 
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} 


break; 
case FD READ: // 套 接 字 读 取 事 件 
{ 
recv (msg[il].s, msg[il] .qq,sizeof (msg[i] .qq) ,NULL); 
// 接 收 相应 套 接 字 上 的 消息 
int nRow=m list.InsertItem(m list.GetItemCount()+1, msg[i].qq.m name); 
// 向 列表 控件 中 插入 行 数据 


m list.SetItemText (nRow,1, msg[i] .qq -m addr); // 设 置 数据 
' 
break; 
default: break; 
} 
} 


保存 并 编译 运行 以 上 代码 ， 当 客户 端 向 服务 器 发 送 连接 请 求 后 ， 服 务 器 同意 连接 并 将 
客户 端的 相关 信息 显示 在 列表 控件 中 ， 如 图 11.25 所 示 。 


交 . 仿 qq 程序 服务 器 


当前 在 线 用 尸 以 及 所 发 送 消息 恨 击 殉 表 项 可 发 过 消息 ) 


用 区 型 | 


图 11.25 服务 器 显示 连接 客户 端的 相应 信息 


当 服 务 器 端 接收 客户 端 所 发 送 的 消息 以 后 ， 服 务 器 还 应 该 将 该 消息 转发 到 客户 端 指定 
的 接收 方 。 因 此 ， 在 服务 器 套 接 字 的 消息 响应 函数 中 ， 还 需要 添加 相应 的 代码 ， 其 代码 
如 下 : 
{ 
// 省 略 部 分 代码 


for(int i=0;i<5;i++) 


if(msg[i] .qq.m namel== m 1ist.GetItemText (i,3)) // 判 断 昵 称 是 否 存在 


send (msg[i].s,é&msg[i] .qq.msg,1024,NULL); // 将 信息 转发 到 接收 方 
} 


} 
// 省 略 部 分 代码 


Ee 
同时 ， 用 户 也 可 以 双击 列表 中 指定 客户 端的 昵称 ， 向 该 客户 端 发 送信 息 。 该 功能 在 列 
表 控 件 的 双击 消息 响应 函数 OnDblclkList10 中 实现 。 代 码 如 下 : 


void CQQD1g: :OnDblclkList]l (NMHDR* pNMHDR, LRESULT* pResult) 


POSITION pos=m list.GetFirstSelectedItemPosition() ;// 获 取 鼠 标 双击 位 置 
if (pos==NULL) // 判 断 位 置 是 否 为 空 
{ 
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MessageBox (" 用 户 双击 的 位 置 错误 或 该 列表 为 空 !") ; 
上 


else 
{ 
int nItem=m list.GetNextSelectedItem(pos); 
// 获 取 该 位 置 的 索引 值 


Cstring str=m list.GetItemText (nItem,1); // 获 取 相应 的 客户 号 码 或 昵称 
CString strl=m list.GetItemText (nItem,2); 


CMessage mesg; // 定 义 消息 发 送 框 对 象 
mesg-m num=str; // 对 话 框 初始 化 时 赋值 
mesg.m ip=strl; 

mesg.DoModal ( ); // 显 示 消息 发 送 框 


lL 
*pResult = 0; 


} 
当 用 户 双击 列表 控件 中 的 某 一 项 时 ， 会 弹出 消息 发 送 对 话 框 ， 如 图 11.26 所 示 。 


11.26 显示 消息 发 送 对 话 框 


在 消息 发 送 对 话 框 中 ， 用 户 单 击 “ 回 复 ” 按 钮 ， 程 序 会 显示 信息 输入 框 以 及 “发 送 ” 
功能 按钮 。 代 码 如 下 : 


void CMessage: :OnRelay() //“ 回 复 ” 按 钮 消息 响应 函数 
员 
GetD1gItem(IDC_TEXT2) ->ShowWindow (true) ; ”// 使 按钮 控件 可 见 
GetD1gItem(IDC_SEND) ->ShowWindow (true); 
} 


运行 上 面 的 程序 ， 用 户 单 击 “ 回 复 ” 按 钮 后 ， 消 息 发 送 对 话 框 会 显示 信息 发 送 编辑 框 
以 及 “发 送 ” 按 钮 ， 如 图 11.27 所 示 。 


图 11.27 显示 编辑 框 和 “发 送 ” 按 钮 
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其 中 ，“ 发 送 ”按钮 的 消息 响应 函数 功能 是 将 用 户 编辑 的 信息 发 送 到 指定 客户 端 。 代 
码 如 下 : 


void CMessage::OnSend () 
{ 


CString msg,str; // 定 义 字符 串 变量 
GetDlgItem(IDC TEXT2)->GetWindowText (msg); // 获 取消 息 编辑 框 中 的 内 容 
GetDlgItem(IDC IP)->GetWindowText (str); // 获 取 显 示 的 IP 地 址 
for (int i=1;i<=m list.GetItemCount ();i++) // 循 环 获取 列表 控件 中 的 IP 地 址 
{ 

CString m ip; // 定 义 字 符 串 变量 

m list.GetItemText (i,m ip); // 获 取 列 表 项 目 中 的 IP 地 址 

if (m ip==str) // 若 IP 地 址 相同 


{ 
send (msg [i] .s,msg.GetBuffer (1), sizeof (msg), NULL) ; // 发 送信 息 到 客户 端 
} 

} 

} 


在 服务 器 端 ， 用 户 已 经 实现 了 一 些 常 用 的 功能 。 当 用 户 学 习 本 节 知 识 时 ， 需 要 将 书 中 
的 理论 知识 与 实例 代码 相 结合 ， 这 样 学 习 效 果 将 比较 明显 。 


2. 客户 端 功能 实现 


在 实例 工程 中 ， 用 户 仅 需要 完成 客户 端 向 服务 器 端 发 送 相关 信息 即 可 。 首 先 ， 使 用 
MFC 应 用 程序 向 导 为 列表 控件 添加 双击 的 消息 响应 函数 OnDblclkList10。 然后， 在 该 函数 
中 显示 消息 发 送 对 话 框 发 送 消 息 。 代 码 如 下 : 


void CQQD1g: :OnDblclkListl (NMHDR* pNMHDR, LRESULT* pResult) 
{ 
POSITION pos=m list.GetFirstSelectedItemPosition();// 获 取 双 击 位 置 
if (pos==NULL) // 判 断 位 置 是 否 为 空 
{ 
MessageBox (" 用 户 双击 的 位 置 错误 或 该 列表 为 空 !") ; 
} 


else 
{ 
int nItem=m list.GetNextSelectedItem(pos); 
// 获 取 该 位 置 的 索引 值 
CString str=m list.GetItemText (nItem,0); // 获 取 相 应 的 客户 号 码 或 昵称 

send.m_name=" 客 户 昵称 : "; // 对 话 框 初始 化 时 赋值 
strcat (send.m name.GetBuffer(1), str.GetBuffer (1)); / /连接 字符 串 
mesg.DoModal ( ); // 显 示 消 息 发 送 框 


} 
*pResult = 0; 


} 
用 户 编 译 并 运行 以 上 代码 后 ， 鼠 标 双击 客户 端 列 表 的 某 一 项 ， 程 序 将 弹出 消息 发 送 对 
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话 框 ， 如 图 11.28 所 示 。 


客户 昵称 ,幻影 


| 


图 11.28 弹出 消息 发 送 对 话 框 


当 程 序 弹出 消息 发 送 对 话 框 后 ， 用 户 便 可 以 输入 相应 信息 ， 单 击 “ 发 送 ” 按 钮 ， 将 该 
信息 发 送 到 服务 器 端 进行 转发 。 代 码 如 下 : 


void CSsend: :OnSend () // 发 送 按钮 消息 响应 函数 
Cstring strystrLls // 定 义 字符 串 变 量 
sockaddr in addr; // 定 义 地 址 结构 变量 
adqr .sin family=AF INET; // 填 充 地 址 结构 
adqdr.sin port=htons (80); // 指 定 监听 端口 为 80 


addr.sin addr.s un.S addr=inet addr (str14) // 指 定 主机 IP 地 址 
connect (s, ( sockaddr*) addr, sizeof(addr),NULL) ;// 连 接 服务 器 


GetD1gItem(IDC_EDIT1) ->GetWindowText (str); // 获 取 用 户 输入 的 数据 
send (s,str.GetBuffer (1), sizeof (str), NULL); // 发 送信 息 
GetD1gItem(IDC_EDIT2) ->GetWindowText (str1); // 获 取信 息 显示 框 中 的 内 容 
strl+="\r\n"; // 添 加 回 车 换行 符 
str1l+=str; // 连 接 字 符 串 


GetDlgItem(IDC EDIT2)->SetWindowText (str1); // 设 置信 息 显示 框 的 内 容 
} 


用 户 将 上 面 的 代码 保存 、 编 译 并 运行 后 ， 便 可 以 实现 客户 端 向 服务 器 端 发 送 消息 ， 如 
图 11.29 所 示 。 


客户 昵称 ，lymld 


图 11.29 消息 发 送 对 话 框 发 送 消息 
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全 注意 : 用 户 在 学 习 过 程 中 , 可 以 在 随 书 光盘 的 实例 代码 中 ,， 试 着 添加 自己 的 代码 。 例 如 ， 
为 消息 发 送 对 话 框 设置 背景 等 。 这 样 ， 能 促进 用 户 的 学 习 。 


11.2.3 封装 CData 类 


在 11.2.2 节 中 ， 分 别 向 用 户 介绍 了 服务 器 端 和 客户 端的 各 个 功能 实现 方法 。 为 了 让 用 
户 深入 了 解 C++ 面向 对 象 编程 的 方法 ， 在 本 节 中 ， 将 各 个 功能 函数 封装 在 CData 类 中 。 使 
用 时 ， 直 接生 成 CData 类 实例 对 象 ， 通 过 该 对 象 调用 相关 的 功能 函数 。 


1. 定义 CData 类 
首先 ， 用 户 需 要 定义 CData 类 头 文件 Datah。 代 码 如 下 : 


class CData 


nes 
CData() // 构 造 函数 

void bind(); // 服 务 器 绑 定 套 接 字 函数 

void sevsend (SOCKET&, char*, int, int) 7 // 服 务 器 发 送 函 数 

void sevrecv (SOCKETE&, char*,int, int) 7 // 服 务 器 接收 函数 

void connect () ; // 客 户 端 连接 函数 

void send (SOCKET&, char*, int, int) 7 // 客 户 端 发 送 函 数 

void recv (SOCKET&, char*, int, int) 7 // 客 户 端 接收 函数 
~CData () 7 


然后 ， 在 定义 文件 Data.cpp 中 ， 实 现 各 个 功能 函数 的 具体 方法 。 代 码 如 下 : 


#include "Data.h" 
#include "iostream.h" 


CData: :CData () // 构 造 函 数 
1 
void CData::bind() // 服 务 器 绑 定 套 接 字 函 数 
{ 
WSADATA data; // 定 义 结构 体 变 量 
Cstring name; // 定 义 主机 名 字符 串 
DWORD ss=MAKEWORD (2,0); // 指 定 套 接 字 版 本 
: :WSAStartup (ss, &data); // 初 始 化 套 接 字 库 
Ss=::socket (AF_INET,SOCK STREAM, IPPROTO TCP); 
// 创 建 套 接 字 
sockaddr in addr; // 定 义 地 址 结构 变量 


: :gethostname ( (char*) gname, (int) sizeof (name) ) ; // 获 得 主机 名 字 
hostent *p=::gethostbyname ( (char*) gname); // 从 主机 名 获取 主机 地 址 


in addr *a=(in addr*)*p->h addr list; // 获 得 本 机 IP 地 址 
CString str14=::inet ntoa(la[0]); // 转 换 字符 串 IP 地 址 
addr.sin family=AF INET; // 填 充 地 址 结构 
addr.sin port=htons (80); // 指 定 监听 端口 为 80 


addr.sin addr.s un.s addr=inet addr (str14); // 指 定 主 机 IP 地 址 
::bind(s, (sockaddr*) gaddr, sizeof (addr)); // 将 本 地 信息 绑 定 到 套 接 字 
"isteon(s,. SS) // 监 听 

WSAAsyncSelect (s, this->m hWnd,WM SOCK,FD ACCEPTI|FD READ); 
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// 将 套 接 字 设置 为 异步 模式 
void CData: :sevsend (SOCKFET s,char* buff,int len,int flags) 
// 自 定 服务 器 发 送 函数 
send(s,buff, len, flags); // 调 用 API 发 送 函 数 
void CData::sevrecv(SOCKET s,char* buff,int len,int flags) 
// 自 定义 服务 器 接收 函数 
recv (s,buff, len, flags); // 调 用 API 接收 函数 
} 
void CData: :connect () 
sockaddr in addr; // 定 义 地 址 结构 变量 
addr.sin family=AF INET; // 填 充 地 址 结构 
addr.sin port=htons (80); // 指 定 监 听 端 口 为 80 


addr.sin adqr.S un.S addr=inet addr (str14); // 指 定 主机 IP 地 址 
if(connect(s,( sockaddr*)addr,sizeof (addr) ,NULL)==-1) 
/ /连接 服务 器 
{ 
MessageBox ("连接 服务 器 失败 ! ") ; // 提 示 用 户 连 接 服 务 器 失败 
由 


} 
void CData::send(SOCKET s,char* buff,int len,int flags) 


// 自 定 客户 端 发 送 函 数 

{ 
GetD1gItem(IDC EDIT1) ->GetWindowText (str); 

// 获 取 用 户 输入 的 数据 
send(s,str.GetBuffer (1), sizeof (str), NULL); 

// 发 送信 息 
GetDlgItem(IDC EDIT2)->GetWindowText (str1); 

// 获 取信 息 显 示 框 中 的 内 容 
strl+="\r\n"; // 添 加 回 车 换行 符 
str1l+=str; // 连 接 字 符 串 
GetDlgItem(IDC EDIT2)->SetWindowText (str1); 

// 设 置信 息 显示 框 的 内 容 
} 
void CData::recv(SOCKET s,char* buff,int len,int flags) 

// 自 定义 客户 端 接收 函数 
{ 

char buff[1024]; // 定 义 字符 缓冲 区 

memset (gbuff, 0,1024); // 初 始 化 字符 缓冲 区 
recv(s, gbuff,1024, NULL); // 接 收 数据 
| 
void CData::~CData() // 析 构 函 数 


} 


上 面 的 代码 已 经 基本 实现 了 自 定义 CData 的 基本 方法 。 用 户 在 使 用 该 类 时 ， 必 须 在 程 
序 中 包含 该 头 文件 Datah。 和 否则 ， 用 户 将 不 能 正确 使 用 自 定义 类 CData。 


2. 使 用 CData 类 


用 户 在 程序 需要 使 用 自 定 义 类 CData 时 ， 首 先 需 要 包含 该 类 头 文件 。 代 码 如 下 : 
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es // 省 略 部 分 代码 
#include "Data-h" // 包 含 自 定义 类 头 文件 


全 注意 : 在 VC 中 包含 头 文件 时 ， 如 果 所 包含 的 头 文件 是 系统 定义 的 头 文件 ， 则 使 用 符号 
“< >” 括 起 来 。 否 则 ， 使 用 符号 “" "” 括 起 来 。 


然后 ， 再 定义 自 定义 类 对 象 。 代 码 如 下 : 

Se // 省 略 部 分 代码 

CData dat; // 定 义 类 对 象 

完成 以 上 步骤 后 ， 用 户 便 可 以 在 程序 中 使 用 该 对 象 调 用 相关 的 成 员 函 数 了 。 例 如 ， 当 
服务 器 端 转发 消息 时 ， 应 该 使 用 CData 类 中 服务 器 发 送 函 数 对 消息 进行 发 送 。 代 码 如 下 : 


void CQQD1g::Onsoc (WPARAM wParam, LPARAM lParam) 
{ 


switch (lParam) // 判 断 套 接 字 事件 
a 
es // 省 略 部 分 代码 
case FD READ: // 套 接 字 读 取 事 件 
{ 
// 省 略 部 分 读 取 事 件 响应 代码 


for (Int i=0;i<5;i++) 
{ 
if(msg[i] .qq.m namel== m list.GetItemText (i,3)) 
// 判 断 昵称 是 否 存在 
{ 
dat.send (msg[i].s, &msg[i] .qq.msg,1024,NULL); 
// 使 用 对 象 将 信息 转发 到 接收 方 
} 


用 户 使 用 自 定义 类 CData 中 的 成 员 时 ， 仅 需要 使 用 该 类 对 象 对 函数 进行 调用 即 可 。 所 
以 ， 在 本 节 中 ， 不 再 对 该 类 中 其 他 的 成 员 函 数 进行 举例 调用 ， 请 用 户 自 行 参考 随 书 光盘 中 
的 实例 代码 。 


11.3 Q 版 邮件 收发 功能 


在 实例 程序 界面 中 ， 用 户 已 经 看 到 了 QQ 邮件 按钮 ， 因 此 用 户 可 能 会 问 为 什么 还 没有 
实现 该 按钮 的 消息 响应 函数 。 在 本 节 中 ， 将 主要 向 用 户 讲解 该 功能 的 具体 实现 方法 以 及 回 
顾 一 下 邮件 的 相关 格式 等 。 


11.3.1 信件 格式 和 内 容 


在 第 7 章 中 ， 已 经 向 用 户 讲解 了 关于 邮件 发 送 与 接收 的 相关 知识 。 在 本 节 中， 将 引导 
用 户 回顾 一 下 前 面 所 讲解 的 相关 内 容 。 首 先 ， 邮 件 的 一 般 格 式 如 下 
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Data:Tue,04 Feb 2009 21:18:03+0800 
From:lymlrl@163.com 
Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina.com.cn 


// 发 送 者 为 多 个 地 址 
To:lymlrl@126.com, data@yahoo.com.cn,asj@sina.com.cn 
// 接 收 者 也 为 多 个 
Subject: This is a E-mail // 邮 件 主题 
Hello lymlrl! // 邮 件数 据 体 


This is a E-Mail! 


在 上 面 的 邮件 格式 中 , Data 等 字段 分 别 描述 了 邮件 的 相关 信息 。 例如， 邮件 发 送 日 期 、 
发 送 者 以 及 接收 者 等 。 
然后 ， 用 户 可 以 根据 邮件 的 一 般 格式 ， 构 造 一 封 简单 的 邮件 。 代 码 如 下 


Data:Tue,04 Feb 2009 21:18:03+0800 

From:1ymlr1lQ163 .com 

Reply-to:lymlrl@sina.com.cn // 回 复 邮 件 地 址 
Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina.com.cn 
To:lymlrl@126.com, data@yahoo.com.cn,asj@sina.com.cn 


Subject: VC 编程 ! // 邮 件 主题 
请 教 几 个 关于 Vc 编程 的 问题 ? // 邮 件 体 
a // 省 略 部 分 邮件 数据 


一 般 邮 件 的 格式 如 上 所 示 ， 如 果 用 户 对 邮件 格式 等 不 熟悉 ， 请 复习 第 7 章 中 的 相关 内 
容 。 在 本 节 中 ， 不 再 獒 述 这 些 知 识 点 。 


11.3.2 ”邮件 的 基本 语法 


一 般 情况 下 ， 邮 件 是 由 格式 加 上 语法 构成 。 因 此 ， 在 本 节 中 ， 主 要 向 用 户 讲解 邮件 语 
法 方面 的 知识 。 首 先 ， 邮 件数 据 是 由 一 些 SMTP 邮件 头 字段 标识 ， 如 表 11.4 所 示 。 


表 11.4 SMTP 邮 件 头 字段 


字 段 意 义 字 意 义 
From 邮件 创建 者 的 邮件 地 址 In- Reply-To 邮件 正 被 回复 


To Data 邮件 创建 的 时 间 
Sender Subject 邮件 主题 
Reply-to Comments 邮件 的 其 他 说 明 


在 表 11.4 中 , 列举 出 了 一 些 比较 常用 的 SMTP 邮件 头 字段 ,关于 这 些 字段 的 含义 以 及 
用 法 请 用 户 复习 第 7 章 相关 知识 点 。 例 如 , 在 邮件 中 标识 邮件 发 送 者 和 接收 者 的 邮件 地 址 。 
代码 如 下 : 


5 // 省 略 部 分 代码 
Erom:1Ymlrle163 .com // 标 识 邮 件 发 送 者 
To:1ymlrle126.com // 标 识 邮 件 接收 者 
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然后 ， 请 用 户 参 照 11.3.1 节 中 邮件 格式 和 本 节 中 所 讲解 的 SMTP 邮件 头 字段 ， 可 以 自 
行 构造 一 封 简单 的 邮件 。 


11.3.3 ”如 何 构 造 并 发 送 一 封 邮件 


首先 ， 用 户 在 构造 一 封 邮件 时 ， 应 该 对 该 邮件 的 相关 信息 进行 描述 。 代 码 如 下 : 


Data:Tue,04 Feb 2009 21:18:03+0800 

From:lymlrl1@163.com 

Reply-to:lymlrl@sina.com.cn // 回 复 邮 件 地 址 

Sender: lymlrl@126.com, wexs@163.com,wen@126.com,wuy@sina.com.cn 

To:lymlrl@126.com, data@yahoo.com.cn,asj@sina.com.cn 

Subject: VC 编程 ! // 邮 件 主题 

有 // 省 略 部 分 代码 

在 上 面 的 信息 描述 中 ， 主 要 是 描述 了 邮件 构造 的 日 期 、 发 送 者 、 接 收 者 以 及 邮件 主题 
等 。 接 下 来 ， 便 可 以 构造 邮件 内 容 了 。 但 是 ， 需 要 用 户 注意 邮件 内 容 与 邮件 信息 描述 之 间 
必须 空 一 行 ， 以 区 分 两 者 内 容 。 代 码 如 下 : 


// 省 略 部 分 邮件 描述 


请 教 几 个 关于 Vc 编程 的 问题 ? // 邮 件 体 
本 // 省 略 部 分 邮件 数据 


然后 ， 邮 件 构 造成 功 便 可 以 将 其 发 送 到 目的 地 址 了 。 请 用 户 参 考 第 7 章 实例 程序 ， 本 
节 不 再 向 用 户 讲述 发 送 邮件 的 相关 编程 方法 了 。 

在 本 节 实 例 程序 中 ， 用 户 可 以 通过 单 击 “QQ 邮件 ”按钮 调用 第 7 章 实例 程序 或 者 是 
Windows 系统 的 邮件 发 送 程序 发 送 邮 件 。 

如 果 用 户 采用 第 7 章 的 实例 程序 发 送 邮件 ， 则 需要 在 “QQ 邮件 ”按钮 的 消息 响应 函 
数 中 ， 添 加 代码 调用 邮件 发 送 实例 程序 。 代 码 如 下 : 

void CQOQD1g: :OnEmail() 

CString str=" 邮 件 收发 器 .exe"; // 定 义 文件 路 径 

STARTUPINFO si={sizeof (si)}; // 定 义 结构 体 变 量 


PROCESS INFORMATION pi; 
CreateProcess (str.GetBuffer (1) ,NULL, NULL, NULL, true, NULL, NULL, NULL, &s 


i,&pi); 
// 调 用 进程 打开 邮件 收发 器 
} 
除了 使 用 上 述 使 用 的 邮件 收发 器 之 外 , 用 户 也 可 以 使 用 Windows 系统 的 邮件 发 送 程序 
进行 邮件 服务 操作 。 代 码 如 下 : 


void CQQD1g: :OnEmail () 
册 

::ShellExecute (NULL, NULL, "mailto:lymlrl@163.com", NULL, NULL, SW SHOW) 
} 


与 前 面 的 方法 相 比 , 调用 Windows 系统 的 邮件 发 送 程序 对 邮件 进行 发 送 比 较 简 单 。 但 
是 ， 用 户 使 用 这 种 方法 具有 很 大 的 局 限 性 。 因 为 用 户 在 程序 中 只 能 指定 一 个 固定 的 邮件 接 
收 者 的 E-mali 地 址 。 当 然 ， 为 了 消除 这 样 的 限制 ， 用 户 也 可 以 通过 一 个 简单 的 对 话 框 ， 设 
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PB 件 接收 者 的 E-mali 地 址 。 
实现 由 用 户 设置 邮件 接收 者 ， 必 须 在 实例 工程 中 添加 一 个 对 话 框 ， 并 将 该 对 话 框 关联 


一 个 新 类 CSet。 然 后 ， 在 窗口 类 中 声明 该 对 话 框 类 的 实例 对 象 。 代 码 如 下 : 


#include "Set.h" 
class CQQD1g : public CDialog 
public: 
CSet set; // 定 义 邮件 地 址 设置 对 话 框 对 象 


ee // 省 略 部 分 代码 
上 


当 窗 口 对 象 定义 以 后 ， 用 户 可 以 在 QQ 邮件 按钮 的 消息 响应 函数 中 编程 实现 弹出 邮件 


地 址 设置 对 话 框 。 代 码 如 下 : 


void CQQD1g: :OnEmail () 
{ 


set.DoModal( ); 
} 


保存 、 编 译 并 运行 程序 ， 当 用 户 单 击 “QQ 邮件 ”按钮 后 ， 程 序 会 弹出 邮件 地 址 设置 


对 话 框 ， 如 图 11.30 所 示 。 


图 11.30 ”邮件 地 址 设置 对 话 杠 
用 户 在 弹出 的 邮件 地 址 设置 对 话 框 中 输入 邮件 接收 者 的 E-mail 地 址 ， 单 击 OK 按钮 。 


接着 程序 会 调用 Windows 系统 的 邮件 发 送 程序 ， 代 码 如 下 : 


void CSet::OnOK() //OK 按钮 消息 响应 函数 
ii 

CString mail,str; // 定 义 字 符 串 变量 
mail+="mailto:"; // 连 接 字 符 串 
GetD1gItem(IDC_EDIT1) ->GetWindowText (str); // 获 取 用 户 输入 的 邮件 地 址 
if(str.-GetLength ()==0) // 判 断 输入 是 否 为 空 

MessageBox (" 邮 件 接收 地 址 不 能 为 空 !") ; // 弹 出 消息 框 

[1 

else 

下 

maili=str; // 连 接 邮件 地 址 字符 串 
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::ShellExecute (NULL, NULL, mail, NULL, NULL, SW_ SHOW) 
// 调 用 邮件 发 送 程序 

: :SendMessage (this->m hWnd,WM CLOSE， (i) // 关 闭 设 置 对 话 框 

} 

上 面 的 代码 中 ， 用 户 调用 邮件 发 送 程序 成 功 之 后 ， 必 须发 送 关 闭 消息 关闭 地 址 设置 对 
话 框 。 和 否则 ， 程 序 界 面 会 显得 不 友好 。 该 程序 运行 效果 请 用 户 参考 随 书 光盘 中 的 实例 代码 。 

在 本 节 中 ， 主 要 是 将 本 实例 与 第 7 章 邮 件 收发 器 的 相关 知识 结合 起 来 向 用 户 讲解 实现 
邮件 发 送 的 功能 。 具 体 代码 与 运行 效果 请 用 户 参 考 随 书 光盘 。 


11.4 Q 版 浏览 器 


Q 版 浏览 器 是 指 用 户 在 本 章 实例 中 , 可 以 通过 界面 中 的 按钮 打开 浏览 器 浏览 相关 网 页 。 
在 第 5 章 中 ， 已 经 向 用 户 讲解 了 VC 实现 网 页 浏览 器 功能 的 方法 。 所 以 ， 本 节 中 仅 向 用 户 
介绍 URL 编码 的 相关 知识 以 及 在 仿 QQ 实例 中 使 用 浏览 器 浏览 网 页 。 


11.4.1 URL 编码 


URL 编码 是 一 种 浏览 器 用 来 打包 表单 输入 的 格式 。 一 般 情 况 下 , 浏览 器 从 表单 中 获取 
所 有 的 变量 以 及 其 中 的 值 ， 并 移 去 或 者 蔡 换 那些 不 能 进行 传送 的 字符 等 。 当 然 ， 程 序 在 进 
行 URL 编码 时 ， 还 取决 于 用 户 所 使 用 的 数据 传送 方式 是 GET 还 是 POST 方式 。 

用 户 在 浏览 网 页 时 ， 经 常会 遇 到 一 些 向 服务 器 提交 数据 等 操作 。 此 时 ， 用 户 仔 细 看 看 
网 页 的 网 址 会 发 现 网 址 后 面 连接 了 很 长 的 一 段 字符 。 这 些 字符 便 是 用 户 提交 的 数据 ， 只 是 
该 数据 已 经 被 进行 了 URL 编码 。 所 以 ,用户 看 不 懂 这 串 长 长 的 字符 。 例 如 ， 当 用 户 登 录 邮 
箱 时 ， 浏 览 器 地 址 栏 中 显示 的 提交 网 页 如 下 : 


https://reg.163.com/logins.jsp?type=l&url=http://entry.mail.163.com/ 

coremail/fcg/ntesdoor2?lightweight%3D1%26verifycookie%3D1%26language%3D 

-1%26style%3D21 

在 上 面 的 网 址 中 ， 语 句 “type=1” 表 示 登 录 方 式 为 验证 登录 。 而 后 面 紧 跟着 的 一 串 字 
符 “%3D1%26verifycookie%3D1%26language%3D-1%26style%3D21”， 则 表示 用 户 输入 的 
用 户 名 以 及 密码 已 经 经 过 了 URL 编码 。 当 服务 器 接收 到 用 户 的 请 求 后 , 其 脚本 程序 会 从 该 
网 址 中 获取 用 户 的 用 户 名 以 及 密码 并 与 数据 库 中 的 相应 数据 进行 比较 ， 判 断 用 户 是 否 登录 
成 功 。 

由 于 在 本 实例 中 ， 仅 需要 用 户 调用 浏览 器 实现 浏览 网 页 的 功能 。 所 以 ， 关 于 URL 编 
码 方面 的 知识 ， 本 书 不 再 进行 介绍 。 如 果 用 户 对 此 感 兴趣 ， 请 参考 其 他 一 些 专门 讲解 网 页 
浏览 器 相关 知识 的 书籍 。 


11.4.2 ”使 用 浏览 器 
用 户 在 仿 QQ 实例 中 ， 可 以 使 用 两 种 方法 调用 网 页 浏览 器 浏览 网 页 ， 分 别 是 使 用 第 5 
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章 中 设计 的 实例 程序 和 使 用 Windows 正 浏览 网 页 。 由 于 在 程序 中 ， 调 用 前 者 实现 浏览 网 
页 的 方法 与 前 一 节 中 调用 邮件 收发 器 的 方法 相同 。 所 以 在 本 节 中 ， 主 要 向 用 户 讲解 第 二 种 
实现 方法 。 

(1) 用 户 在 实例 工程 中 添加 一 个 用 于 指定 网 页 地 址 的 对 话 框 , 并 为 其 关联 新 类 名 CNet。 
然后 ， 再 在 实例 对 话 框 类 中 定义 CNet 类 的 实例 对 象 。 代 码 如 下 : 


#include "Net.h" // 包 含 头 文件 
class CQQD1g : public CDialog 


public: 
CNet net; // 定 义 网 页 地 址 设置 对 话 框 对 象 
a // 省 略 部 分 代码 

} 


(2) 用 户 可 以 在 “QQ 网 页 ”按钮 的 消息 响应 函数 中 ， 弹 出 网 页 地 址 对 话 框 。 代 码 
如 下 : 
void CQQD1g: :OnNet () 


net .DoModal( ); // 弹 出 网 页 地 址 设置 对 话 框 
} 


(3) 保存 、 编 译 并 运行 该 程序 ， 当 单 击 “QQ 网 页 ”按钮 时 ， 程 序 会 弹出 网 页 地 址 设 
置 对 话 框 ， 如 图 11.31 所 示 。 


11.31 弹出 网 页 地 址 设置 对 话 框 


用 户 在 该 对 话 框 中 输入 网 页 地 址 后 , 单 击 OK 按钮 便 可 以 打开 正 浏览 浏览 相关 的 网 页 
了 。 代 码 如 下 : 


void CNet::OnOK() //“OK” 按 钮 消息 响应 函数 
i 
CString netadd, str; // 定 义 字符 串 变量 
GetD1gItem(IDC_EDIT1) ->GetWindowText (netadd) ; // 获 取 用 户 输入 的 网 页 地 址 
if (netadd.GetLength ()==0) // 判 断 输入 是 否 为 空 
{ 

MessageBox ("网 页 地 址 不 能 为 空 !") ; // 弹 出 消息 框 


} 
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else 
{ 
if (netadd.Find ("www") !=-1) // 判 断 用 户 的 输入 是 否 正确 
{ 
ShellExecute (NULL, "open", netadd, NULL, NULL, SW SHOW); 
// 调 用 IE 浏览 器 浏览 网 页 
else 
{ 
strt="www."; // 添 加 字符 串 


strt+=netadd; 
ShellExecute (NULL, "open", str, NULL, NULL, SW SHOW); 
} 
: :SendMessage (this->m hWnd,WM CLOSE,0,0); // 关 闭 该 对 话 框 
} 
| 
在 代码 中 , 用 户 首先 判断 输入 是 否 为 空 。 若 不 为 空 ， 则 验证 输入 的 网 址 是 否 符合 规范 。 
否则 ， 提 示 用 户 网 页 地 址 不 能 为 空 。 网 址 验证 成 功 之 后 ， 调 用 正 浏览 器 浏览 相应 的 网 页 。 


11.5 小 结 


在 本 章 中 ， 向 用 户 介绍 了 仿 QQ 软件 的 制作 过 程 ， 以 及 各 个 功能 的 实现 方法 。 在 具体 
的 编程 过 程 中 ， 不 仅 介绍 了 实例 程序 的 工作 原理 等 ， 还 向 用 户 讲解 了 界面 的 设计 、 控 件 的 
使 用 、 发 送 邮 件 以 及 打开 网 页 等 功能 的 具体 实现 方法 。 通 过 本 章 实例 的 实现 方法 ， 用 户 可 
以 学 习 到 关于 程序 界面 设计 等 方法 的 应 用 。 
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在 日 常生 活 中 ， 计 算 机 串口 对 于 用 户 而 言 ， 有 着 非常 广泛 的 用 途 。 例 如 ， 工 业 控 制 、 
计算 机 串口 通信 等 。 因 此 ， 串 口 通信 编程 是 实现 这 些 用 途 的 最 好 途径 。 在 本 章 中 ， 将 向 用 
户 介绍 串口 通信 编程 的 基础 知识 以 及 串口 通信 数据 的 校 验方 法 等 。 


12.1 串口 通信 基本 概念 


用 户 需要 进行 串口 编程 ， 必 须 对 串口 通信 的 一 些 基本 概念 以 及 通信 数据 传输 的 方式 等 
非常 地 熟悉 。 因 此 ， 在 本 节 中 ， 主 要 向 用 户 介绍 一 些 关 于 串口 通信 方面 的 基础 知识 。 


12.1.1 串口 通信 概述 


串口 通信 是 指 用 户 通过 计算 机 串口 实现 计算 机 与 计算 机 之 间 的 通信 。 一 般 情 况 下 ， 串 
口 均 是 按 位 〈bit) 进行 发 送 和 接收 数据 。 所 以 ， 计 算 机 串口 常 被 用 于 远 距离 传输 信号 或 者 
数据 。 串 口 通信 编程 中 ， 最 重要 的 参数 包括 波 特 率 、 数 据 位 、 停 止 位 等 。 当 两 台 计 算 机 通 
过 串口 进行 通信 时 ， 必须 将 这 些 参数 设置 为 相同 。 否 则 ,两 台 计 算 机 将 不 能 进行 数据 通信 。 

1. 波 特 率 

波 特 率 是 指 用 户 每 秒 钟 通过 串口 进行 数据 传输 的 位 个 数 。 波 特 率 在 计算 机 串口 通信 
中 ， 是 一 个 非常 重要 的 参数 ， 常 被 用 于 衡量 通信 的 速度 。 例 如 ， 用 户 在 进行 串口 编程 时 ， 
将 波 特 率 设置 为 9600， 其 表示 的 意思 是 串口 每 秒 钟 传输 的 数据 个 数 为 9600 B。 

各 注意 : 用 户 在 使 用 串口 进行 通信 时 ， 波 特 率 可 以 为 任何 值 . 但 是 , 用 户 在 设置 波 特 率 时 ， 
应 该 综合 分 析 之 后 再 进行 设置 。 默 认 情 况 下 ， 波 特 率 为 9600。 

波 特 率 也 可 以 被 用 来 描述 串口 通信 的 距离 。 一 般 情 况 下 ， 波 特 率 越 大 ， 其 数据 传输 距 
离 越 短 。 如 果 用 户 需要 进行 远 距 离 数 据 传输 时 ， 需 要 将 波 特 率 设置 得 越 小 。 

2. 数据 位 

数据 位 是 指 在 计算 机 串口 通信 中 ， 用 来 描述 实际 传输 数据 位 的 参数 。 其 中 ， 实 际 传输 
的 数据 位 包括 开始 位 、 停 止 位 、 数 据 位 以 及 奇偶 校 验 位 。 这 些 数据 位 均 包 含 在 一 个 数据 包 
中 进行 传输 。 

3. 停止 位 

停止 位 是 指 计算 机 发 送 或 接收 的 每 个 数据 包 的 最 后 一 位 。 因 为 计算 机 通信 数据 都 是 在 
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传输 电缆 中 进行 传输 的 ， 所 以 ， 计 算 机 发 送 的 数据 会 受到 计算 机 时 钟 的 影响 ， 导 致 停止 位 
不 能 简单 的 被 用 于 表示 数据 传输 的 结束 。 

如 果 用 户 设置 的 停止 位 位 数 越 多 ， 则 其 数据 传输 的 速率 会 越 慢 。 这 是 由 于 计算 机 串口 
数据 传输 的 特点 是 按 位 进行 传输 的 。 


全 注意 : 用 户 在 实际 编程 时 ， 为 了 避免 停止 位 与 用 户 所 传输 的 数据 位 相同 ， 造 成 数据 传输 
的 混乱 。 所 以 ， 用 户 需 要 将 串口 数据 的 停止 位 的 位 数 增多 。 


4. 奇偶 校 验 位 


奇偶 校 验 位 在 串口 通信 中 , 是 一 种 最 简单 的 检 错 方式 。 其 中 分 别 包含 了 四 种 校 验方 法 : 
奇 位 校 验 和 偶 位 校 验 。 当 然 ， 在 串口 通信 中 ， 没 有 校 验 位 也 是 允许 的 。 

用 户 在 进行 串口 编程 时 ， 必 须 设置 至 少 一 个 检验 位 ， 以 确保 用 户 传输 的 数据 的 完整 性 
和 准确 性 。 当 用 户 传 输 的 数据 中 “1” 的 个 数 为 偶数 时 ， 则 校 验 位 为 “1”。 和 否则 ， 校 验 位 
为 “0”。 当 接收 方 接收 到 数据 时 ， 将 首先 按照 校 验 位 ， 对 数据 中 的 “1” 的 个 数 进行 检测 。 
如 果 为 奇数 ， 则 表示 传送 正确 。 和 否则， 表示 传送 错误 。 


全 注意 : 偶 校 验 和 奇 校 验 的 基本 原理 是 相同 的 ， 只 需 检 测 数据 中 的 “1” 或 “0” 的 个 数值 
是 偶数 还 是 奇数 。 


12.1.2 单 工 、 半 双 工 和 全 双 工 的 定义 


一 般 ， 根 据 串 口 数据 的 传输 方向 ， 可 以 将 串口 通信 方式 大 致 分 为 单 工 、 半 双 工 和 全 双 
工 。 用 户 在 使 用 串口 进行 编程 时 ， 必 须 需 要 知道 串口 的 通信 方式 。 所 以 ， 在 本 节 中 ， 将 向 
用 户 分 别 介绍 单 工 、 半 双 工 和 全 双 工 的 基本 定义 。 

1, 单 工 


单 工 是 指 在 串口 通信 中 ， 其 通信 数据 只 能 由 一 端 向 另 一 端 进行 单 向 传输 。 一 般 ， 串 口 
单 工 通信 方式 常 被 应 用 在 工业 控制 方面 。 例 如 ， 工 业 计算 机 通过 串口 ， 从 传感器 中 获取 采 
样 数据 等 。 具 体 的 单 工 通信 方式 如 图 12.1 所 示 。 


计算 机 A 
计算 机 B 


通信 数据 仅 能 进行 
单 向 传输 


Co 


12.1 串口 通信 的 单 工 通信 方式 


ee 
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全 注意 : 如 果 串 口 采用 单 工 通信 方式 进行 通信 ， 其 通信 数据 仅 能 从 计算 机 B 到 计算 机 A。 
数据 传输 方向 不 能 逆转 。 目前 , 这 种 通信 方式 已 经 很 少 应 用 在 实际 项 目的 开发 中 。 
2. 半 双 工 


半 双 工 通信 是 指 串口 数据 可 以 从 通信 的 一 端 传输 到 另 一 端 ， 而 该 数据 传输 方向 也 可 以 
进行 逆转 。 但 是 ， 计 算 机 在 串口 通信 的 半 双 工 方式 下 ， 并 不 能 同时 发 送 和 接收 数据 。 所 以 
用 户 采用 半 双 工 方式 进行 串口 通信 时 ， 只 能 允许 一 个 方向 上 的 数据 传输 。 半 双 工 通信 方式 
如 图 12.2 所 示 。 


计算 机 A 计算 机 B 


(ss 


任意 时 刻下 ， 通 


信 数 据 仅 能 在 一 
SS 个 方向 上 进行 传输 
SS SS 
SS 


图 12.2 串口 通信 的 半 双 工 通信 方式 


全 注意 ; 在 串口 通信 中 ， 采 用 半 双 工 方式 进行 数据 传输 时 ， 用 户 需要 使 用 到 两 根 数据 传输 
线 。 但 是 ， 在 任意 时 刻 ， 这 两 根 数据 传输 线 只 能 允许 其 中 一 根 存 在 数据 传输 。 
3. 全 双 工 


全 双 工 是 指 在 任意 时 刻下 ， 串 口 通信 数据 可 同时 在 传输 线路 上 ， 进 行 双向 传输 。 使 用 
该 通信 方式 时 ， 用 户 需 要 使 用 两 根 数据 传输 线 ， 一 根 数据 传输 线 发 送 数据 ， 而 另 一 根 数据 
传输 线 则 接收 数据 。 这 种 通信 方式 已 经 被 广泛 使 用 到 实际 的 项 目 开发 中 。 全 双 工 通信 方式 
如 图 12.3 所 示 。 


计算 机 A 计算 机 B 


> 


任意 时 刻下 ， 通 信 数 


< 据 可 以 同时 在 传输 线 
ss 路 上 进行 双向 传输 < 
SS 


图 12.3 串口 通信 的 全 双 工 通信 方式 
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在 本 节 中 ， 向 用 户 介绍 了 单 工 、 半 双 工 以 及 全 双 工 串口 通信 方式 的 基本 工作 原理 。 用 
户 在 进行 串口 编程 时 ， 一 定 需 要 首先 规定 串口 的 通信 方式 。 


12.1.3 同步 方式 与 异步 方式 


在 串口 通信 中 ， 除 了 12.1.2 节 向 用 户 介 绍 的 单 工 等 通信 方式 以 外 ， 串 口 的 通信 方式 还 
可 以 分 为 同步 方式 和 异步 方式 。 本 节 将 向 用 户 介绍 这 两 种 通信 方式 的 基本 原理 以 及 区 别 。 


1. 同步 方式 


同步 通信 方式 是 指 在 串口 通信 编程 中 ， 用 户 从 串口 读 取 或 者 写 入 数据 时 ， 其 线程 函数 
会 发 生 阻 塞 。 当 用 户 使 用 同步 方式 传输 数据 时 ， 程 序 会 在 该 操作 上 进行 等 待 ， 直 到 该 操作 
有 返回 值 返回 为 止 。 

用 户 使 用 同步 方式 传输 数据 时 ,是 将 数据 一 个 一 个 地 进行 传输 。 但 是 , 在 同步 方式 下 ， 
不 允许 传输 的 数据 之 间 存 在 空位 。 所 以 ， 数 据 在 进行 同步 传输 前 ， 必 须 填充 空 数据 位 。 一 
般 ， 进 行 同步 传输 时 ， 均 以 同步 字符 作为 数据 的 开始 。 如 果 接收 方 接收 到 该 同步 字符 ， 则 
将 其 之 后 的 数据 认为 是 实际 传输 的 数据 进行 处 理 。 

串口 通信 的 同步 方式 按照 同步 字符 的 不 同 , 可 以 分 为 面向 字符 、 面向 比特 等 同步 方式 。 
首先 ， 面 向 字符 的 同步 方式 是 按照 一 定 的 格式 进行 数据 传输 ， 该 格式 如 表 12.1 所 示 。 


表 12.1 面向 字符 的 同步 方式 数据 格式 


SYN 块 校 验 


用 户 通 过 表 12.1 所 示 的 数据 格式 , 可 以 看 到 在 同步 方式 下 传输 数据 所 使 用 的 全 部 控制 
字符 ， 这 些 控制 字符 的 意义 如 表 12.2 所 示 。 


表 12.2 串口 同步 控制 字符 意义 


控制 字符 控制 字符 意义 
SYN 一 上 
SOH | 开始 标题 标识 | | ETB | 标识 数据 块 传输 结束 


je 包含 发 送 方 地 址 以 及 接 标识 全 部 数据 传输 结束 
收 方 地 址 (包括 多 个 数据 块 ) 
实际 传输 数据 标识 一 一 一 一 整个 数据 的 校 验 码 


面向 字符 的 同步 方式 , 最 大 的 缺点 在 于 当 数 据 发 送 时 , 如果 实际 数据 与 同步 字符 相同 ， 
则 接收 方 将 无 法 识别 数据 的 完整 性 和 准确 性 。 

如 果 用 户 采 用 面向 比特 的 同步 方式 进行 数据 传输 ， 则 需要 使 用 特定 的 八 位 二 进 制 数 作 
为 传输 数据 的 开始 或 者 结束 标志 。 其 数据 格式 如 表 12.3 所 示 。 


表 12.3 面向 比特 的 同步 传输 方式 数据 格式 


om | A | aa | < | 7p | om 


在 该 数据 格式 中 ， 是 以 二 进 制 数 01111110 作为 数据 的 开始 和 结束 标志 。 其 中 ， 数 据 
格式 中 ， 各 个 字 节 的 含义 如 下 : 


STX 
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口 A 表示 接收 方 的 地 址 字 节 。 当 接收 方 接收 到 数据 后 ， 会 检查 这 个 地 址 ， 若 地 址 字 
节 的 第 一 位 为 0， 则 表示 其 后 面 是 一 个 地 址 字 节 。 若 为 1， 则 表示 该 字 节 后 面 是 最 
后 一 个 地 址 字 节 。 


各 注意 : 地 址 字 节 的 位 数 必 须 是 8 的 整数 倍 。 


口 B 表示 控制 字 节 。 表 示 传 输 数据 的 类 型 。 若 控制 字 节 的 第 1 位 为 0， 则 表示 该 字 节 
后 还 有 一 个 字 节 ， 并 且 这 个 字 节 也 是 控制 字 节 。 

口 C 表示 实际 传输 的 数据 。 

口 D 表示 循环 匈 余 校 验 位 。 

在 本 小 节 中 ， 主 要 向 用 户 介绍 了 同步 传输 方式 的 基本 原理 以 及 数据 格式 等 。 通 过 本 小 
节 的 学 习 ， 用 户 应 该 可 以 学 会 构造 用 于 进行 同步 传输 的 串口 数据 。 

2. 异步 方式 

异步 传输 方式 与 同步 传输 方式 恰好 相反 。 异 步 传 输 方式 是 指 程序 可 以 将 传输 数据 的 处 
理 交 给 一 个 线程 或 者 进程 完成 ， 而 程序 本 身 则 可 以 进行 其 他 数据 的 处 理 。 该 传输 方式 是 一 
种 非 阻 塞 方式 。 用 户 在 实际 编程 时 ， 可 以 将 其 视 为 一 种 多 线程 工作 方式 。 


采用 异步 传输 方式 传输 数据 的 发 送 方 可 以 在 任意 时 刻 将 数据 发 出 ， 而 接收 方 也 可 以 在 
任意 时 刻 ， 接 收 数据 。 因此， 在 串口 通信 时 ， 采 用 异步 传输 方式 可 以 提高 程序 的 运行 效率 。 


全 注意 ; 异步 传输 方式 是 以 字符 为 单位 进行 数据 传输 的 。 


12.1.4 ”串口 通信 的 应 用 方向 


目前 ， 由 于 串口 能 进行 远 距离 数据 传输 。 所 以 ， 串 口 通信 的 应 用 方向 十 分 广泛 ， 常 被 
用 作 工 业 控 制 、 工 业 通信 、 数 据 传输 等 。 

通过 串口 ， 计 算 机 可 以 实现 控制 一 台 或 多 台 下 位 机 ， 实 现 计算 机 控制 自动 化 。 这 样 ， 
用 户 不 但 可 以 节约 成 本 ， 还 可 以 最 大 限度 的 发 挥 计算 机 的 作用 。 

在 科技 日 益 发 达 的 当今 时 代 ， 计 算 机 串口 会 越 来 越 多 地 被 应 用 到 各 个 行业 中 。 因 此 ， 
用 户 学 习 计算 机 串口 编程 将 显得 尤为 重要 。 


12.2 常用 数据 校 验 法 


在 12.1 节 中 ， 已 经 向 用 户 介绍 了 一 些 串口 编程 的 基础 知识 。 本 节 将 主要 向 用 户 介绍 在 
串口 通信 中 ， 最 为 常用 的 两 种 数据 校 验 方法 。 这 两 种 校 验方 法 分 别 是 奇偶 校 验 以 及 循环 元 
余 校 验 。 


12.2.1 奇偶 校 验 


在 串口 通信 中 ， 其 通信 数据 会 受到 外 部 干扰 ， 导 致 数据 的 完整 性 和 准确 性 遭 到 破坏 。 
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因此 ， 用 户 为 了 使 通信 数据 完整 、 准 确 地 到 达 接 收 方 ， 需 要 使 用 一 些 校 验 数 据 的 方法 。 其 
中 ， 最 为 简单 的 一 种 方法 便 是 奇偶 校 验 法 ， 但 是 该 方法 仅 能 检 错 ， 而 不 能 纠 错 。 所 以 ， 当 
用 户 检查 到 错误 时 ， 只 有 要 求 发 送 方 重新 发 送 数据 。 一 般 ， 在 奇偶 校 验 法 中 ， 包 含 了 奇 校 
验 以 及 偶 校 验 两 种 。 


1. 奇 校 验 


奇 校 验 法 是 指 在 通信 数据 中 ， 数 据 位 1 的 个 数 应 该 为 奇数 个 。 此 时 ， 通 信 数 据 的 校 验 
位 为 1， 否则 为 0。 当 接收 方 接收 到 数据 后 ， 将 各 个 数据 位 相 加 。 若 相 加 后 和 为 奇数 ， 则 表 
示 通 信 数 据 完整 而 且 正确 。 和 否则， 通信 数据 出 现 错误 ， 接 收 方 需要 向 数据 发 送 方 请 求 数据 
重 发 。 

例如 ， 用 户 定义 通信 数据 为 “01011110”， 其 中 最 后 一 位 为 奇 校 验 位 。 用 户 将 这 个 数 
据 相 加 后 ， 其 和 为 奇数 5。 但 是 ， 其 校 验 位 却 为 0， 表 示 该 数据 在 传输 过 程 中 ， 受 到 了 外 界 
的 干扰 。 此 时 ， 由 于 奇偶 校 验 法 只 能 检 错 而 不 能 进行 纠 错 ， 所 以 接收 方 只 能 要 求 发 送 方 重 
新 发 送 该 数据 。 


2.， 偶 校 验 


偶 校 验 法 是 指 在 通信 数据 中 ， 数 据 位 1 的 个 数 应 该 为 偶数 个 。 此 时 ， 通 信 数 据 的 校 验 
位 应 该 设置 为 0, 否则 需要 设置 为 1。 当 接收 方 接收 到 该 数据 后 , 同样 是 将 各 个 数据 位 相 加 。 
若 相 加 后 其 和 为 偶数 ， 则 表示 通信 数据 完整 而 且 正 确 。 和 否则， 该 通信 数据 出 现 错误 ， 接 收 
方 需要 向 数据 发 送 方 请 求 数据 重 发 。 

例如 ， 用 户 定义 一 个 通信 数据 为 “01101100”， 其 中 最 后 一 位 是 偶 校 验 位 。 此 时 ， 用 
户 将 该 数据 的 各 个 数据 位 进行 相 加 ， 其 和 为 偶数 4。 由 于 该 通信 数据 的 校 验 位 为 0， 所 以 ， 
接收 方 接收 到 的 数据 完整 而 正确 。 


3， 奇 校 验 和 偶 校 验 的 区 别 


在 串口 数据 校 验 中 ， 奇 校 验 主要 用 于 判断 数据 中 1 或 0 的 个 数 是 否 为 奇数 。 如 果 该 数 
据 的 校 验 数 据 位 上 的 数据 为 1， 那么 表示 该 数据 在 传输 过 程 中 ， 未 受到 外 界 的 干扰 。 否 则 ， 
当 校 验 数据 位 上 的 数据 为 0 时 ， 表 示 该 数据 的 完整 性 和 准确 性 已 经 受到 外 界 干扰 。 此 时 ， 
接收 方 必须 要 求 发 送 方 重新 发 送 数据 。 

而 偶 校 验 主要 用 于 判断 数据 中 的 1 或 0 的 个 数 是 否 为 偶数 。 当 该 数据 的 校 验 数 据 位 上 
的 数据 为 0 时 ， 表 示 该 数据 在 传输 过 程 中 ， 未 受到 外 界 的 和 干扰。 否则， 当 校 验 数据 位 为 1 
时 ， 表 示 数 据 在 传输 过 程 中 ， 受 到 了 外 界 的 干扰 。 

不 论 是 奇 校 验 法 ， 还 是 偶 检 验 法 ， 其 基本 实现 原理 都 是 一 样 的 。 因 此 ， 用 户 在 实际 使 
用 时 ， 需 要 指定 数据 中 的 特征 数据 位 是 1 还 是 0， 按 照 其 数据 位 个 数 设置 相应 的 校 验 数据 
位 即 可 。 


全 注意 : 奇偶 校 验 法 只 能 检 错 ， 而 不 能 实现 纠 错 功能 。 
12.2.2 ”循环 元 余 校 验 


一 般 情况 下 ， 在 使 用 串口 通信 时 ， 为 了 能 够 对 数据 进行 检 错 并 纠 错 ， 用 户 都 会 在 数据 
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校 验 中 广泛 采用 循环 元 余 校 验 这 一 方法 。 在 本 节 中 ， 将 向 用 户 介绍 在 串口 通信 中 常用 的 循 
环 校 验 法 。 

循环 宛 余 校 验 码 是 由 两 部 分 组 成 ， 前 一 部 分 是 信息 码 ， 也 就 是 需要 校 验 的 信息 。 而 后 
一 部 分 则 是 校 验 码 。 如 果 循 环 元 余 校 验 码 的 总 长 度 为 n, 而 信息 码 长 度 为 k, 则 可 以 将 其 称 
为 (nk) 码 。 一 般 情 况 下 ， 其 编码 规则 均 由 几 个 步骤 构成 。 

(1) 将 通信 数据 中 的 信息 码 左 移 m 位 (kt+m=n)〉。 例如， 通信 数据 为 “01101101”， 
接着 ， 用 户 将 该 数据 向 左 移 动 3 位 。 移 动 后 的 数据 为 “01101000”。 

(2) 将 移动 后 的 数据 与 一 个 用 于 生成 校 验 码 的 二 进 制 数 相 异 或 ， 所 得 到 的 二 进 制 数 
便 是 校 验 码 。 

例如 ， 用 户 定义 的 用 于 生成 校 验 码 的 二 进 制 数 为 “111101”， 现 在 将 该 二 进 制 数 与 移 
位 后 的 数据 进行 异 或 操作 。 具 体 计 算 方 法 是 ， 将 数据 的 前 6 位 与 自 定义 的 校 验 码 相 异 或 。 
计算 式 如 : 111101 ^ 011011=100110。 再 将 刚才 异 或 时 ， 通 信 数 据 锁 剩 下 的 最 后 两 位 〈 即 
“01”) 与 该 结果 进行 异 或 的 结果 为 “100111”。 最 后 , 用 户 再 将 该 结果 与 校 验 码 “111101? 
进行 异 或 ， 得 到 最 后 的 结果 是 “011010”。 用 户 最 终 得 到 的 结果 也 就 是 所 需要 的 校 验 码 。 


全 注意 : 当 数 据 的 接收 方 接收 到 数据 时 ， 必 须 使 用 上 面 所 使 用 的 用 于 生成 校 验 码 的 二 进 制 
数 为 “111101” 与 接收 数据 进行 运算 ， 恢 复数 据 的 原样 。 在 本 节 中 ， 所 介绍 的 异 
或 运算 是 指 相同 的 二 进 制 数 异 或 得 到 0， 而 不 同 的 二 进 制 数 异 或 得 到 1。 其 运算 
的 本 质 等 同 于 加 法 运算 ， 而 不 同 的 地 方 是 相 加 而 不 进位 。 


12.3 小 结 


在 本 章 中 ， 主 要 从 串口 通信 编程 的 角度 向 用 户 介绍 了 串口 通信 编程 中 将 使 用 或 者 遇 到 
的 一 些 基本 概念 ， 并 且 使 用 图 例 向 用 户 重 点 讲解 了 串口 通信 的 几 种 模式 。 用 户 从 这 些 通 信 
模式 中 可 以 清楚 地 看 到 通过 串口 进行 通信 的 基本 过 程 。 

本 章 还 向 用 户 讲解 了 通过 串口 进行 数据 传输 时 ， 一 些 常用 的 数据 校 验方 法 。 在 文中 ， 
较 详 细 地 举例 说 明 每 种 方法 的 基本 原理 等 。 在 第 13 章 中 , 将 向 用 户 讲解 实现 串口 通信 程序 
设计 实例 的 过 程 。 


mn 
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如 今 ， 越 来 越 多 的 用 户 将 计算 机 串口 应 用 到 实际 生产 和 生活 中 。 利 用 串口 进行 数据 通 
信 ， 不 但 可 以 实现 远 距 离 数 据 传输 ， 还 可 以 轻松 实现 数据 的 检 错 与 纠 错 。 用 户 在 VC 中 ， 
实现 串口 通信 编程 可 以 使 用 MFC 中 的 串口 控件 以 及 Windows API 函数 。 所 以 , 在 本 章 中 ， 
将 向 用 户 分 别 介 绍 这 两 种 实现 方法 。 


13.1 MFC 串口 控件 编程 


在 MFC 类 库 中 ， 用 户 可 以 使 用 串口 控件 实现 串口 编程 。 该 控件 相当 于 用 户 自 定义 的 
类 ， 而 其 中 的 每 个 功能 都 是 由 该 类 中 的 成 员 函 数 实现 的 。 在 VC 开发 环境 中 ， 用 户 可 以 在 
项 目 中 插入 串口 控件 ， 然 后 再 为 其 关联 一 个 类 名 即 可 。 本 节 将 主要 向 用 户 介绍 如 何 使 用 
MFC 串口 控件 实现 串口 通信 编程 。 


13.1.1 VC 中 应 用 MSComm 控件 编程 步骤 


用 户 在 VC 开发 环境 中 ， 使 用 MSComm (串口 ) 控件 进行 编程 ， 必 须 首 先 将 该 控件 添 
加 到 用 户 的 工程 项 目 中 。 因 此 ， 本 节 主 要 向 用 户 讲解 在 已 创建 的 实例 工程 中 ， 插 入 串口 控 
件 的 基本 步 又。 


1. 创建 工程 


在 VC 中 , 用 户 需要 创建 基于 MFC 串口 控件 编程 的 实例 工程 。 但 是 , 用 户 在 设置 该 工 
程 的 相关 信息 时 ， 必 须 为 该 工程 指定 包含 ActiveX 控件 的 功能 。 和 否则， 用 户 所 创建 的 工程 
将 不 能 使 用 MFC 串口 控件 。 其 创建 步骤 如 下 : 

(1) 选择 “文件 ” |“ 新建” 命令， 打开 “新 建 ”对 话 框 ， 如 图 13.1 所 示 。 用 户 在 新 建 
工程 对 话 框 中 ， 修 改 该 工程 实例 的 名 称 为 “使 用 MFC 串口 控件 实现 串口 编程 ”。 


全 注意 : 在 这 一 步 ， 用 户 必须 选择 工程 的 类 型 为 MFC AppWizard[exe]。 否 则 ， 用 户 所 创 
建 的 工程 将 不 能 使 用 MFC 串口 控件 。 


(2) 用 户 修改 完工 程 名 称 后 ， 单 击 “确定 ”按钮 ， 开 始 设置 该 工程 的 相关 信息 ， 如 图 
13.2 所 示 。 由 于 该 串口 实例 工程 是 基于 单 文档 的 ， 所 以 ， 用 户 需要 在 这 一 步 将 应 用 程序 的 
类 型 指定 为 单 文档 。 

(3) 单 击 “ 下 一 步 ”按钮 ， 选 择 是 否 包含 数据 库 ， 如 图 13.3 所 示 。 
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文件 ”工程 | 工作 区 | 其 它 文档 | 


国 ATLCOM AppWizard 

[RICluster Resource Type Wizard 

园 custom AppWizard 

本 Database Project 

吕 DevStudio Add-in Wizard 

ES Extended Stored Proc Wizard 
ISAPI Extension Wizard 

ss Makefile 

Bs MFC ActiveX ControlWizard 

一 MFC AppWizard (dll] 


New Database Wizard 


使 用 MFC 串 口 控件 实现 串口 编程 


位 置 [CG): 
EE3 银 伟 ( 勿 删 N124 书 中 实例 4 书 中 | 


“ 创建 新 的 工作 空间 BI] 
F 天 加 到 当前 工作 空间 内 
厂 从 属于 [DJ 


Tf Utility Project 

国 win32 Application 

Win32 Console Application 

[a Win32 DynamicLink Library 

到 Win32 Static Library 
平台 四: 


MWin32 


图 13.1 新 建 工程 对 话 框 


了 FC 应 用 程序 向 导 - 步 村 1 


您 要 创建 的 应 用 程序 关 型 是 : 


“ 单 文档 加 
多 重文 档 IM] 
基本 对 话 框 D| 


F 文档 /查看 体系 结构 支持 回 


您 的 资源 使 用 的 语言 是 : 
中 文 [中 国 ] APPWZCHS.DLU 时 


图 13.2 选择 应 用 程序 类 型 


全 注意 : 如 图 13.3 所 示 ， 用 户 在 该 工程 中 不 需要 任何 的 数据 支持 。 所以， 在 向 导 设置 的 该 
步骤 中 ， 选 择 “ 和 否 ” 单 选 按 钮 即 可 。 


(4) 单 击 “ 下 一 步 ” 按 钮 ， 为 该 工程 选择 支持 ActiveX 控件 ， 如 图 13.4 所 示 。 用 户 为 
了 在 该 工程 中 使 用 串口 控件 ， 必 须 在 这 一 步 指定 其 包含 ActiveX 控件 的 支持 。 

(5) 单 击 “ 下 一 步 ”按钮 ， 直 接 跳 到 设置 步骤 的 第 5 步 ， 设 置 应 用 程序 的 风格 ， 如 图 
13.5 所 示 。 在 本 章 实例 中 ， 是 将 该 应 用 程序 的 风格 设置 为 默认 风格 。 


.354。 
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了 FC 应 用 程序 向 导 - 步 束 2 共 6 步 


您 要 包含 数据 库 吗 ? 

= 固 

广 标题 文件 

和 查看 数据 库 不 使 用 文件 支持 
三 查看 数据 库 使 用 文件 支持 


如 果 您 要 包含 数据 库 视 图 , 就 必须 选择 数据 产 . 


孝 据 疡 


没有 选 定数 据 源 . 


图 13.3 选择 是 否 包 含 数据 库 


FC 应 用 程序 向 导 - 步骤 3 共 6 步 


| 你 要 使 用 什么 样 的 复合 文档 支持 ? 
ss < 反 厂 不 在 习 
广 套 器 
三 微型 服务 器 
三 完整 服务 器 
三 套 器 和 服务 器 
厂 话 本. 


您 还 要 包含 其 他 支持 吗 ? 
厂 自动 山 
F ActiveX 控件 [BR] 


图 13.4 选择 支持 ActiveX 控件 


(6) 单 击 “ 下 一 步 ” 按 钮 ， 指 定 文档 视图 类 的 基 类 ， 如 图 13.6 所 示 。 
用 户 修改 工程 视图 类 的 基 类 以 后 ， 直 接 单 击 “ 完 成 ”按钮 ， 完 成 工程 的 设置 。 
全 注意 : 在 该 实例 工程 中 ,用 户 将 该 工程 视图 类 的 基 类 设置 为 CFormView。 这 是 由 于 考虑 
到 用 户 在 实际 编程 时 ， 这 样 做 会 减少 不 必要 的 程序 代码 。 


2.， 向 工程 中 添加 串口 控件 
用 户 在 工程 名 为 “使 用 MFC 串口 控件 实现 串口 编程 ”的 实例 工程 中 ， 可 以 通过 菜单 


“a 
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插入 串口 控件 。 


了 FEC 应 用 程序 向 导 - 步骤 5 共 6 步 


您 喜欢 的 风格 是 : 
“MFC 标准 


和 Windows 变 源 管理 呈 样 式 


您 希望 生成 源 文件 备注 吗 ? 
F 是 四 
否 四 


您 希望 使 用 MFC 库 吗 ? 
人 作为 共享 的 DLL 
三 作为 静态 的 DLL 


图 13.5 设置 应 用 程序 的 风格 


了 EC 应 用 程序 向 导 - 步 驮 6 共 6 步 


应 用 程序 向 导 为 您 创建 了 以 下 羡 : 
CMFCApPp 

CMainFrame 

CMFCDoc 


头 文件 [EJ]: 
使 用 MFC 串 口 控件 实 1 


执行 文件 中 
Er - 使 用 MFC 囊 口 控件 实 1 


图 13.6 指定 视图 类 的 基 类 名 


首先 ， 选 择 “ 工 程 ”|“ 增 加 到 工程 ”|“Components and Controls Gallery” 命 令 ， 打 开 
Components and Controls Gallery 对 话 框 ， 如 图 13.7 所 示 。 

在 用 户 的 计算 机 没有 注册 MSCOMM32.0CX 控件 的 情况 下 ， 用 户 是 不 能 使 用 该 控件 
的 。 此 时 ， 用 户 只 能 通过 运行 命令 “regsvr32+ 控 件 的 完整 路 径 名 ”完成 控件 的 注册 ， 如 图 
13.8 所 示 。 

如 果 该 命令 执行 成 功 ， 则 会 弹出 控件 注册 成 功 对 话 框 ， 如 图 13.9 所 示 。 


“A 
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通过 以 上 步骤 ， 用 户 已 经 在 项 目 工程 中 ， 成 功 地 添加 了 MFC 串口 控件 。 接 下 来 ， 用 
户 便 可 以 为 该 控件 关联 串口 控件 类 CMSComm， 并 使 用 该 类 中 的 成 员 函 数 完成 串口 通信 
功能 。 


Components and Controls Gallery 


选择 要 插入 到 工程 的 组 件 
查找 范围 中 :| 由 Registered ActiveX Controls 了 | 


spyDAdn Class 
< 


文件 名 :ISCOWM32. OCX 


图 13.7 添加 串口 控件 


1 和 


打开 外 ): hesvr32 C; WINDOYS\s 水 ten32WISCOW32.0CX 呈 


站) c:wrmimows\system3zwscowaz ocx 中 的 D11RegisterServer 成 功 。 


确定 取消 “] [ 浏 史 加 ] 


图 13.8 注册 串口 控件 图 13.9 提示 控件 注册 成 功 


13.1.2 ”MSComm 控件 类 


在 MFC 中 ， 串 口 控件 的 类 名 为 CMSComm。 用 户 在 程序 中 可 以 使 用 该 类 的 构造 函数 ， 
创建 该 类 的 实例 对 象 。 然 后 ， 使 用 该 对 象 调用 其 成 员 函 数 可 以 实现 串口 的 相关 功能 。 有 关 
串口 类 成 员 函 数 的 讲解 将 在 13.1.3 节 进 行 。 本 节 将 主要 向 用 户 讲解 CMSComm 类 的 相关 定 
义 以 及 使 用 该 类 的 相关 方法 。 


1. CMSComm 类 头 文件 


用 户 在 使 用 CMSComm 类 前 , 需要 对 该 类 中 的 相关 变量 以 及 成 员 函 数 进 行 比较 细致 的 
了 解 。 所 以 ， 在 本 节 中 ， 将 专门 向 用 户 介绍 CMSComm 类 的 头 文件 的 具体 定义 。 该 头 文件 
定义 如 下 : 


class CMSComm : public CWnd 
1 
Protected: 


"Ms 
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DECLARE DYNCREATE (CMSComm) // 动 态 创建 宏 
public: 
5 // 省 略 部 分 定义 
Virtual BOOL Create (LTPCTSTR lpszClassName, 
LPCTSTR lpszWindowName, DWORD dwStyle, 
const RECT& rect, 
CWnd* pParentWnd, UINT nID, 
CCreateContext* pContext = NULL) 
{return CreateControl (GetClsid(), lpszWindowName, dwStyle, rect, pParentWnd, 
nID); } 
// 创 建 串口 控件 对 象 
BOOL Create (LPCTSTR lpszWindowName, DWORD dwStyle, 
const RECT& rect, CWnd* pParentWnd, UINT nID, 
CFile* pPersist = NULL, BOOL bStorage = FALSE, 
BSTR bstrLicKey = NULL) 
UL 
return CreateControl (GetClsid(), lpszWindowName, dwStyle, rect, pParentWnd, 
nID, 
pPersist, bStorage, bstrLicKey); 
} 
public: 
void SetCommID (long nNewValue); 
long GetCommID(); 


void SetCommPort (short nNewValue); // 设 置 串口 号 码 
short GetCommPort () ; // 获 得 串口 号 码 

void SetCTSHolding (BOOL bNewValue) ; // 设 置 cTSs 的 状态 
BOOL GetCTSHolding (); 

void SetDSRHolding (BOOL bNewValue); // 设 置 DSR 的 状态 
BOOL GetDSRHolding (); 

void SetDTREnable (BOOL bNewValue); // 设 置 DTR 的 状态 
BOOL GetDTREnNnable(); 

void SetHandshaking (long nNewValue); // 设 置 通信 握手 方式 
long GetHandshaking() // 获 取 通 信 握 手 方式 
void SetInBufferSize (short nNewValue) // 设 置 输入 缓冲 区 大 小 
short GetInBufferSize(); // 获 取 输 入 缓冲 区 大 小 


void SetInBufferCount (short nNewValue); 
Short GetInBufferCount (); 


void SetBreak (BOOL bNewValue) // 设 置 是 否 包 含 停止 位 
BOOL GetBreak(); 

void SetInputLen (short nNewValue) // 设 置 读 取 接收 数据 的 字 节 数 
short GetInputLen(); // 获 取 读 取 接 收 数据 的 字 节 数 


void SetNul1Discard(BOOL bNewValue) 

BOOL GetNullDiscard(); 

void SetoutBufferSize (short nNewValue);  // 设 置 输出 缓冲 区 的 长 度 
Short GetOutBufferSize(); // 获 取 输 出 缓冲 区 的 长 度 
void SetOutBufferCount (short nNewValue); 

short GetOutBufferCount (); 

void SetParityReplace (LPCTSTR lpszNewValue); 

CString GetParityReplace(); 


void SetPortOpen (BOOL bNewValue); // 打 开 或 关闭 串口 ， 设 置 为 TRUE 表示 打开 
BOOL GetPortopen () ; // 串 口 是 否 已 打开 ， 如 果 为 TRUE 表示 打开 
void SetRThreshold(short nNewValue); // 设 置 串口 缓冲 区 中 的 字符 数 ， 以 便 产 

生 事 件 


Short GetRThreshold(); 

void SetSettings (LPCTSTR lpszNewValue);  ”// 设 置 串口 ， 如 设置 为 9600,n,8,1 
CString GetSettings(); 

void SetsThreshold(short nNewValue); // 若 为 0， 则 表示 发 送 数据 的 


"35s 
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Short GetSThreshold() 
void SetOutput (const VARIANT& newValue) 
// 一 个 非常 重要 的 函数 ， 用 于 写 串 口 
VARIANT GetOutput () > 
void SetInput (const VARIANT& newValue); 
// 一 个 非常 重要 的 函数 ， 用 于 读 串口 
VARIANT GetInput () 
void SetCommEvent (short nNewValue) 


short GetCommEvent () // 获 得 串口 事件 
void SetEOFEnable (BOOL bNewValue); // 设 置 结束 标志 位 
BOOL GetEOFEnable(); // 获 得 结束 标志 位 
void SetInputMode (long nNewValue); // 设 置 接收 模式 
long GetInputMode(); // 获 取 接 收 模 式 

// 省 略 部 分 成 员 函 数 


D 
在 串口 类 的 头 文件 中 ， 列 出 了 比较 常用 的 CMSComm 类 成 员 函 数 。 其 中 ， 用户 需 要 特 
别 注 意 一 下 。 例 如 ， 串 口 类 对 象 的 创建 、 初 始 化 串口 以 及 串口 参数 设置 等 。 


全 注意 : 串口 控件 类 的 成 员 函 数 说 明 请 参考 上 面 的 该 类 定义 代码 。 
2. 使 用 CMSComm 类 


在 上 面 的 小 节 中 ， 向 用 户 介绍 了 CMSComm 类 的 头 文件 。 用 户 在 该 类 的 头 文件 中 ， 可 
以 看 到 主要 的 成 员 函 数 声明 等 。 在 本 小 节 中 , 将 在 程序 中 ,使 用 该 类 进行 相关 的 串口 操作 ， 


并 向 用 户 介绍 这 些 操作 的 方法 。 
(1) 用 户 要 使 用 CMSComm 类 ， 必 须 在 程序 中 包含 该 类 的 头 文件 。 代 码 如 下 : 
#include MSsComm.h" // 包 含 CMSComm 类 头 文件 
es / /省略 部 分 代码 
(2) 在 程序 中 创建 该 类 的 实例 对 象 。 代 码 如 下 : 
区 // 省 略 部 分 代码 
CMSComm comm.; // 定 义 CMSComm 类 对 象 


当 用 户 成 功 定义 CMSComm 类 对 象 以 后 , 便 可 以 使 用 该 对 象 调用 类 中 的 成 员 函 数 进行 
相关 的 操作 了 。 


13.1.3 ”MSComm 控件 串 行 通信 编程 方法 


在 程序 中 , 用 户 可 以 使 用 已 经 定义 好 的 CMSComm 类 对 象 ， 对 该 类 中 的 成 员 函 数 进行 
调用 以 实现 串口 功能 。 在 本 节 中 ， 主 要 向 用 户 介绍 该 类 中 ， 常 用 的 一 些 成 员 函 数 的 原型 以 
及 使 用 方法 。 


1. 设置 串口 参数 


首先 ， 用 户 需 要 使 用 串口 类 对 象 调用 函数 SetCommPort(0 设 置 将 打开 的 串口 号 。 该 函 
数 原型 如 下 : 


“ye 
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void SetCommPort (short nNewValue); // 设 置 串 口号 码 
该 函数 的 作用 是 指定 或 设置 将 打开 的 串口 号 码 。 参 数 nNewValue 表示 设置 的 串口 号 。 
例如 ， 用 户 在 程序 中 ， 将 使 用 串口 “COM1” 进 行 串口 通信 ， 则 设置 串口 号 的 代码 如 下 : 


a / /省略 部 分 代码 
comm. SetCommPort (1); // 设 置 串口 号 为 "COM1" 


然后 ， 用 户 需 要 设置 通过 串口 接收 数据 的 类 型 。 实 现 该 功能 的 函数 是 SetInputMode()， 
其 原型 如 下 : 
void SetInputMode (long nNewValue); // 设 置 接收 数据 的 类 型 


该 函数 的 作用 是 设置 通过 串口 接收 数据 的 类 型 。 参数 nNewValue 的 取 值 决定 了 接收 数 
据 的 类 型 ， 其 取 值 如 表 13.1 所 示 。 


表 13.1 串口 接收 数据 类 型 的 取 值 


取 值 含 义 

0 表示 接收 数据 的 类 型 是 文本 类 型 

1 表示 接收 的 数据 类 型 为 二 进 制 类 型 
例如 ， 用 户 需 要 通过 串口 接收 二 进 制 数据 ， 则 应 该 将 参数 指定 为 “1”。 代 码 如 下 : 
// 省 略 部 分 代码 
comm. SetInputMode (1) 7 // 设 置 接收 数据 的 类 型 

全 注意 : 当 用 户 设置 串口 数据 接收 类 型 时 ， 为 了 更 完整 地 接收 数据 ， 应 该 使 用 二 进 制 数据 
类 型 进行 接收 。 


用 户 设置 串口 的 相关 参数 ， 可 以 调用 函数 SetSettings() 来 实现 。 该 函数 原型 如 下 : 


void SetSettings (LPCTSTR lpszNewValue); 


参数 lpszNewValue 表示 与 该 串口 相关 的 参数 ， 其 顺序 依次 是 波 特 率 、 奇 偶 校 验 、 数 据 
位 数 、 停 止 位 数 。 例 如 ， 用 户 使 用 该 函数 设置 串口 的 相关 参数 ， 代 码 如 下 : 

Cstring str="9600,n,8,1"; // 定 义 并 初始 化 参数 字符 串 

comm. SetSettings (str); // 设 置 串口 参数 

在 上 面 的 程序 中 ， 用 户 将 波 特 率 设置 为 9600〈 默 认 值 ) ，n 表示 无 校 验 位 ， 数 据 位 为 
8， 停 止 位 为 1。 其 中 ， 设 置 奇偶 校 验 位 的 取 值 如 表 13.2 所 示 。 


表 13.2 设置 奇偶 校 验 位 的 取 值 

含 义 
无 校 验 位 
偶 校 验 位 
奇 校 验 位 


当 串 口 缓冲 区 中 ， 接 收 到 数据 时 ， 串 口 控件 会 产生 串口 事件 。 但 是 ， 用 户 可 以 通过 调 
用 函数 SetRThreshold0 设 置 是 否 产生 该 事件 。 其 原型 如 下 : 


sa 360 


第 13 章 串口 通信 编程 应 用 

void SetRThreshold (short nNewValue) 

该 函数 的 功能 是 由 参数 nNewValue 的 取 值 决定 的 。 如 果 该 参数 取 值 为 0， 则 表示 不 产 
生 串 口 事 件 。 如 果 取 值 为 1， 则 表示 每 接收 到 一 个 字符 就 会 产生 串口 事件 。 例 如 ， 用 户 调 
用 该 改 函数 设置 是 否 产生 串口 事件 ， 其 代码 如 下 : 

Se // 省 略 部 分 代码 

comm. SetRThreshold(1) // 设 置 是 否 产生 串口 事件 

在 程序 中 ， 用 户 设置 串口 为 每 接收 到 一 个 字符 就 产生 串口 事件 。 接 下 来 ， 用 户 需 要 设 


置 读 取 串口 数据 时 ， 从 串口 缓冲 区 中 所 读 取 的 字 节 数 。 实 现 设 置 读 取 数 据 字 节 数 的 函数 是 
SetInputLen()。 函 数 原型 如 下 : 


void SetInputLen (short nNewValue); 


参数 nNewValue 表示 用 户 需要 从 接收 数据 中 读 取 的 字 节 数 。 如 果 该 参数 为 0， 则 表示 
用 户 希 望 将 串口 缓冲 区 中 的 数据 全 部 读 取 。 


2. 打开 串口 

如 果 用 户 设置 完 串 口 的 相关 参数 以 后 ， 便 可 以 调用 函数 SetPortOpen() 将 串口 打开 。 该 
函数 原型 如 下 : 

void SetPortOpen (BOOL bNewValue); 

该 函数 的 作用 是 打开 串口 。 参 数 bNewValue 表示 是 否 打开 串口 ， 若 为 tue， 则 表示 打 
开 串 口 。 与 该 函数 相对 应 的 函数 是 GetPortOpen(0)， 其 作用 是 判断 当前 串口 是 否 处 于 打开 状 


态 。 如 果 当 前 串口 处 于 打开 状态 ， 该 函数 会 返回 tue。 和 否则， 将 返回 false。 
例如 ， 用 户 完 成 串口 的 参数 设置 后 ， 调 用 该 函数 打开 端口 ， 代 码 如 下 : 


// 省 略 部 分 代码 
if(! m Comm.GetPortOpen()) // 判 断 串口 是 否 已 经 打开 
{ 

m Comm.SetPortOpen (TRUE); // 如 果 处 于 关闭 状态 ， 则 将 端口 打开 

} 
else // 如 果 串 口 处 于 打开 状态 ， 则 提示 用 户 串 口 已 

经 打开 
0 
MessageBox ("串口 已 经 打开 "); // 提 示 用 户 串口 已 经 打开 


} 


全 注意 : 用 户 在 进行 串口 编程 时 ， 应 当 养 成 良好 的 习惯 。 在 打开 一 个 串口 前 ， 必 须 使 用 函 
数 GetPortOpen() 判 断 当前 囊 口 的 状态 是 打开 还 是 关闭 的 。 然 后 ， 再 调用 函数 
SetPortOpen() 决 定 是 否 打开 串口 。 


3. 发 送 串 口 数据 


如 果 用 户 成 功 打开 串口 ， 那 么 便 可 以 通过 该 串口 向 另 一 方 发 送 数据 了 。 在 MFC 中 ， 
用 户 可 以 调用 函数 SetOutput0 进 行 数据 的 发 送 。 该 函数 的 原型 如 下 : 


void SetOutput (const VARIANT& newValue); 
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该 函数 的 作用 是 通过 串口 发 送 数据 。 参 数 newValue 表示 将 要 发 送 的 数据 ， 其 类 型 必 
须 强制 转换 为 COleVariant 类 型 。 否 则 ， 数 据 发 送 将 失败 。 例 如 ， 用 户 调用 该 函数 进行 数 
据 发 送 ， 代 码 如 下 : 


有 // 省 略 部 分 代码 
char array[100]; // 定 义 发 送 字 符 数组 
comm.SetOutput (COleVariant (array)); // 发 送 指定 字符 数组 
全 注意 : 当 用 户 使 用 该 函数 进行 数据 发 送 时 ， 必 须 将 这 些 数据 强制 转换 为 COleVariant 
类 型 。 
4， 接收 串口 数据 


在 MFC 中 ， 当 串口 缓冲 区 中 有 数据 到 来 时 ， 串 口 控件 会 发 送 一 个 串口 消息 到 指定 的 
窗口 ， 并 由 窗口 类 中 的 对 应 消息 响应 函数 进行 处 理 。 因 此 ， 用 户 接受 串口 数据 的 操作 应 该 
在 串口 消息 响应 函数 中 进行 。 

(1) 用 户 需要 为 串口 控件 添加 串口 消息 的 响应 函数 ， 如 图 13.10 所 示 。 


IFC Class¥izard 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 


BProject: Class name: Add Class... ~ 
串口 通信 3 


习 lewyoig 可 一 
dt 井口 通信 DIg.h, dt 串口 通信 DIg.cpp | 
Object IDs: Messages: Delete Function | 
IDC_EDIT_RECEVE A [fonComm 


IDC_EDIT SEND Edit Code 


IDC_MSCOMM2 

IDC_OPEN_RADIO 

IDCANCEL 

IDOK ~ 


Member functions: 

W OnButtonOpenS ON_IDC_BUTTON_OPENS:BN_CLICKED 

W OnButtonSave ON_IDC_BUTTON_SAVE:BN_CLICKED 

W OnButtonSend ON_IDC_BUTTON_SEND:BN_CLICKED 

W oncloseRadio é ON_IDC_CLOSE_RADIO:BN_CLICKED 

oncomm ONC MscowMoncomm _B 


Description: 


图 13.10 添加 串口 消息 响应 函数 
(2) 在 该 消息 响应 函数 中 实现 接收 串口 数据 的 操作 。 代 码 如 下 : 


void CMyD1g: :OnComm() // 串 口 消息 响应 函数 
{ 

VARIANT variant; // 定 义 VARIANT 类 型 的 变量 
CoOleSafeArray safearray; // 定 义 COleSafeArray 类 对 象 
int len; // 定 义 变量 

char rxdata[1000]; // 定 义 数组 

CString strs // 定 义 字 符 串 

if (this->comm.GetCommEvent () ==2) // 若 发 生 的 串口 事件 是 读 取 事 件 


{ 
variant=this->comm.GetInput (); // 读 取 串 口 缓冲 区 


s 
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safearray=variant; // 转 换 数据 类 型 
len=safearray.GetOneDimSize(); // 获 取 有 效 数 据 的 长 度 
for(i=0;i<len;i++) 

safearray.GetElement (gi, grxdata[il]); // 将 数据 转换 为 Char 


型 数组 
str.Format ("$c", rxdata); // 格 式 化 输出 字符 串 
} 
MessageBox (str); // 显 示 消息 框 


} 


当 有 串口 事件 发 生 时 ， 用 户 首先 判断 该 事件 是 否 是 串口 读 取 事 件 。 如 果 是 ， 则 使 用 串 
口 类 的 函数 Getmput0 读 取 缓 冲 区 。 再 调用 COleSafeArray 类 的 函数 GetOneDimSize() 获 取 
有 效 数 据 的 长 度 。 最 后 ,使 用 COleSafeArray 类 的 函数 GetElement(O 读 取 数 据 并 将 该 数据 转 
换 为 CHAR 类 型 。 
全 注意 ; 当 用 户 使 用 MFC 串口 控件 进行 串口 通信 编程 时 ， 必 须 遵循 本 节 中 所 讲述 的 串口 

通过 本 节 关 于 串口 控件 编程 的 学 习 ， 用 户 已 经 掌握 了 一 般 情 况 下 ， 使 用 串口 控件 进行 
编程 的 基本 步骤 。 所 以 ， 在 13.1.3 节 中 ， 将 向 用 户 介 绍 基于 单 文档 应 用 程序 的 串口 控件 实 
例 编程 。 


13.1.4 在 基于 单 文档 〈SDI) 程序 中 使 用 MSComm 控件 


在 上 面 的 小 节 中 ， 已 经 向 用 户 讲解 了 串口 控件 的 添加 、 创 建 以 及 使 用 等 方法 。 所 以 ， 
在 本 节 中 ， 将 利用 13.1.1 节 中 所 创建 的 单 文档 实例 工程 ， 向 用 户 讲 解 在 基于 单 文档 的 应 用 
程序 中 如 何 使 用 MSComm (串口 ) 控件 。 


1. 设计 界面 
首先 ， 用 户 可 以 使 用 鼠标 在 面板 中 ， 放 置 控件 并 调整 其 位 置 ， 如 图 13.11 所 示 。 
一 无 标题 - 使 用 WC 来 口 控件 实现 林口 编程 


口中 日 | || 


广 -六 


图 13.11 实例 程序 界面 设计 


“Made 
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然后 ， 实 例 程序 界面 中 的 各 个 控件 ID、 属 性 以 及 作用 如 表 13.3 所 示 。 
表 13.3 控件 ID、 属 性 以 及 作用 


控 件 ID 属 性 作 用 
IDC COMNUM 下 拉 列 表 显示 可 用 的 串口 号 
IDC COMBO 下 拉 列 表 显示 波 特 率 
IDC COMJIAOYAN 下 拉 列 表 选择 校 验方 式 
IDC COMDATA 下 拉 列 表 选择 数据 位 
IDC COMSTOP 下 拉 列 表 数据 保存 方式 
IDC_OPENCOM 按钮 打开 串口 
IDC RECVDATA 按钮 接收 数据 
IDC_ SAVADATA 按钮 保存 数据 
IDC MSG 编辑 框 显示 接收 到 的 数据 
IDC EDIT2 编辑 框 编辑 奖 发 送 的 数据 
IDC SENDDATA 按钮 发 送 数 据 


用 户 可 以 参考 随 书 光盘 中 的 实例 界面 ， 然 后 对 比 一 下 表 13.3 中 所 示 的 各 个 控件 ID 以 
及 作用 等 。 


2. 初始 化 界面 
首先 ， 该 应 用 程序 启动 时 ， 为 了 使 程序 窗口 的 大 小 固定 。 因 此 ， 用 户 需 要 在 实例 程序 
的 框架 类 CMainFrame 中 实现 禁用 最 大 化 按钮 的 功能 。 代 码 如 下 : 


BOOL CMainFrame: :PreCreateWindow (CREATESTRUCT& cs) 
{ 


if( !CFrameWnd::PreCreateWindow(cs) ) // 调 用 基 类 的 函数 

return FALSE; // 返 回 false 
cs.styleg= ~ (WS MAXIMIZEBOX); // 将 窗口 样式 的 指定 值 相 抵消 掉 
return TRUE; // 返 回 true 


} 


在 该 功能 的 实现 代码 中 , 最 为 重要 的 一 段 代码 是 “cs.style&=~(WS_MAXIMIZEBOX);”， 
表示 将 禁用 最 大 化 按钮 。 运 行 以 上 代码 ， 用 户 可 以 看 到 该 程序 窗口 的 最 大 化 按钮 已 经 被 禁 
用 了 ， 如 图 13.12 所 示 。 

然后 , 用 户 还 可 以 将 窗口 自 带 的 状态 栏 和 工具 栏 删除 , 并 将 程序 窗口 的 图 标 设置 为 QQ 
图 标 。 用 户 这 样 做 ， 可 以 实现 界面 的 美化 。 代 码 如 下 : 


int CMainFrame: :OnCreate (LPCREATESTRUCT lpCreatestruct) 
{ 


if (CFrameWnd::OnCreate(lpCreateStruct) == -1) // 调 用 基 类 的 创建 函数 
return -1; 

HICON icon=::AfxGetApp()->LoadIcon (IDI ICON1); // 载 入 图 标 资 源 

this->SetIcon(icon,true); // 设 置 窗口 图 标 

return 0; 


} 


在 上 面 的 代码 中 ， 用 户 将 VC 编译 器 生成 的 关于 状态 栏 和 工具 栏 的 相关 代码 删除 。 并 
调用 函数 载 入 图 标 资源 以 及 设置 程序 窗口 图 标 ， 如 图 13.13 所 示 。 


“364。 


第 13 章 ”串口 通信 编程 应 用 


志 无 标题 - 使 用 王 C 束 口 控件 实现 未 口 编程 
文件 中 编辑 中 查看 0 帮助 
DB “RS 


13.13 ”删除 工具 栏 以 及 状态 栏 并 设置 窗口 图 标 


全 注意 ; 如 果 用 户 将 函数 SetIcon 的 第 二 个 参数 设置 为 tue， 则 表示 将 窗口 的 图 标 修改 了 。 
同时 ， 还 修改 了 该 程序 的 大 图 标 。 用 户 可 以 打开 该 程序 所 在 的 目录 ， 看 到 如 图 
13.14 所 示 的 结果 。 


3. 控件 初始 化 


程序 启动 时 ， 各 个 控件 也 应 该 同时 初始 化 。 例 如 ， 在 下 拉 列 表 中 ， 用 户 应 该 在 控件 初 
始 化 时 ， 设 置 里 面 的 选项 ， 以 便 使 用 者 进行 选择 。 各 控件 的 初始 化 工作 可 以 在 CMFCView 
类 的 初始 化 函数 OnInitialUpdate0 中 进行 。 

首先 ， 用 户 使 用 快捷 键 CtLH+W， 打 开 MFC 应 用 程序 向 导 为 界面 中 的 各 个 控件 添加 相 
应 的 变量 ， 如 图 13.15 所 示 。 


3 
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文件 中 ”编辑 EE 查看 外 收 阅 人 工具) 帮助 如 
加 扫 " 避 - 启 部 搜 索 可 文件 夹 回 - 
地 址 四 ) 


文件 和 文件 夹 任务 


加 所 蛙 一 人 新 文 件 天 

[JR 
| 

芯 共享 此 广 件 严 


图 13.14 修改 了 程序 的 大 图 标 显示 


Message Maps Member Variables | Automation | ActiveX Events | Class Info | 


Broject: Class name: Add Clas: 


使 用 MFC 串 口 控 件 实现 串口 编程 ”| [cMFCView -| 
使 用 MFC 串 口 控件 实现 串口 编程 View.… 使 用 MFC 串 口 控件 实现 串口 编程 View.… 


Control IDs: Type Member Delete Variable 


IDC COMBO 
Update Columns 


IDC_COMDATA 

IDC_COMJIAOYAN 

IDC_COMNUM Bind Al 
IDC_COMSTOP 

IDC_EDIT2 

IDC_MSG 

IDC_OPENCOM 

IDC_RECVDATA 

IDC_SAVADATA 

IDC_SENDDATA 


Description: 


1 


13.15 ”MFC 应 用 程序 向 导 对 话 框 


用 户 在 Control IDs 列表 中 选择 将 添加 变量 的 控件 ID 后 ， 单 击 Add Variable 按钮 弹出 
Add Member Variable 对 话 框 ， 如 图 13.16 所 示 。 

在 图 13.16 所 示 的 对 话 框 中 ， 用 户 需 要 为 控件 设置 变量 名 以 及 类 型 。 在 该 实例 中 ， 各 
个 控件 变量 的 类 型 必须 指定 为 相应 的 控件 类 型 。 然 后 ， 按 照 这 种 方法 为 其 他 控件 依次 添加 
相应 的 控件 变量 。 

然后 ， 用 户 便 可 以 在 CMFCView 类 的 初始 化 函数 OnImitialUpdate0 中 ， 使 用 这 些 控件 
变量 调用 相应 的 函数 进行 各 自 的 初始 化 工作 了 。 代 码 如 下 : 
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void CMFCView: :OnInitialUpdate() // 初 始 化 函数 
{ 


3 // 省 略 部 分 代码 
m comnum.SetWindowText ("COM1") // 初 始 化 显示 默认 串口 号 
m comnum.Addstring ("COM1"); // 向 串口 组 合 框 中 添加 串口 号 字符 串 


m comnum.Addstring ("COM2"); 
m comnum.Addstring ("COM3"); 
m comnum.Addstring ("COM4"); 
m botelv.SetWindowText ("1200"); // 初 始 化 显示 默认 波 特 率 
m botelv.Addstring ("1200"); // 向 波 特 率 组 合 框 中 添加 波 特 率 字符 串 
m botelv.Addstring ("2400"); 
m botelv.Addstring ("9600"); 
m comjiaoyan.SetWindowText (" 奇 校 验 ") ; / /初始化 显示 默认 校 验方 式 
m comjiaoyan.Addstring (" 奇 校 验 ") ; ”// 向 校 验 方式 组 合 框 中 添加 校 验 方式 字符 串 
m comjiaoyan.Addstring (" 偶 校 验 ") ; 
m comjiaoyan.Addstring ("无 校 验 ") ; 
m comdata.SetWindowText ("8"); // 初 始 化 显示 默认 数据 位 字符 串 
m comdata.Addstring ("4"); // 向 数据 位 组 合 框 中 添加 数据 位 字符 串 
m comdata.RAddString("8") 7 
m_comstop.SetWindowText ("文本 "); ”// 初 始 化 显示 默认 保存 数据 方式 字符 串 
m comstop.Addstring ("文本 "); // 向 数据 保存 方式 组 合 框 中 添加 保存 方式 
m comstop.Addstring ("不 保存 "); 
GetDlgItem(IDC RECVDATA) ->EnableWindow (false); 
// 禁 用 各 个 按钮 控件 
GetDlgItem(IDC SAVEDATA) ->EnableWindow (false); 
GetDlgItem(IDC SENDDATA) ->EnableWindow (false); 
} 


在 上 面 的 代码 中 ， 为 了 使 控件 初始 化 显示 时 显示 默认 值 ， 所 以 ， 用 户 在 各 个 控件 添加 
字符 串 之 前 , 均 调 用 函数 SetWindowText0 设 置 了 默认 值 ,将 上 面 的 代码 保存 、 编译 并 运行 ， 
如 图 13.17 所 示 。 


Add Neaber Yariable 


» 无 标题 - 使 用 HEFC 囊 口 控 件 实现 囊 口 编 程 


Member variable name: 
m_botelM 


Category: 
Control 


Variable type: 
CComboBox 


Description: 


mapto CComboBox member 


图 13.16 Add Member Variable 对 话 框 图 13.17 初始 化 控件 后 的 界面 显示 


注意 : 用 户 必 须 在 打开 串口 成 功 之 后 ， 才 可 以 使 用 其 他 功能 。 否 则 ， 其 他 功能 根本 毫 无 
意义 可 言 。 
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4. 使 用 MSComm 控 件 打开 串口 


如 果 用 户 将 串口 参数 设置 完毕 以 后 ， 便 可 以 单 击 “ 打 开 串 口 ”按钮 打开 指定 的 串口 了 。 
首先 ， 为 该 按钮 添加 消息 响应 函数 OnOpencom0。 然 后 ， 用 户 在 该 函数 中 调用 串口 控件 类 
的 相关 函数 实现 打开 串口 的 功能 。 代 码 如 下 : 


void CMFCView::OnOpencom() 
t 


// 打 开 串 口 按钮 消息 响应 函数 


// 获 得 串口 号 
// 判 断 串 口号 ， 以 便 关 联 相 应 的 串口 号 


m comnum.GetWindowText (str); 
iE(Str- Pind("COMLI". 0)!=—1) 
EE 


n=1; // 根 据 用 户 的 选择 设置 相应 的 串口 号 
} 
else 
{ 
if(str.Find ("COM2", 0) !=-1) // 判 断 用 户 选择 的 串口 号 
n= 
} 
else 
{ 
if(str.Find ("COM3", 0) !=-1) // 判 断 用 户 选 择 的 串口 号 
{ 
n=3; 
} 
else 
{ 
n=4; 
} 
} 
} 
str.Empty (); // 清 空 字符 串 
m botelv.GetWindowText (str1); // 获 取 用 户 选 择 的 波 特 率 
str+=strl1; / /连接 字符 串 
SEEF= // 添 加 逗号 
m comjiaoyan.GetWindowText (str1); // 获 取 校 验方 式 
if(str1.Find(" 奇 校 验 ",0) !=-1) // 判 断 用 户 所 选择 校 验方 式 
| 
SEER "Om // 字 符 o 表示 奇 校 验 
} 
else 
{ 
if (str1.Find(" 侦 校 验 ", 0) !=-1) // 判 断 用 户 所 选择 校 验方 式 
Stri="e"; // 字 符 e 表示 偶 校 验 
} 
else 
{ 
str+="n"; // 字 符 n 表示 无 校 验 位 
于 
| 
下 臣下 三 有 
m comdata.GetWindowText (str1); // 获 取 串 口 数据 位 


str+=strl; 
1 
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str+="1"; // 设 置 串口 数据 停止 位 为 1 位 
InitComm(); // 设 置 串口 数据 并 打开 指定 串口 
} 


以 上 代码 主要 是 用 于 获取 各 个 控件 中 , 用 户 所 选择 的 串口 参数 。 其中, 函数 InitComm() 


是 用 户 自 定义 的 成 员 函 数 。 其 定义 如 下 : 


void CMFCView::InitComm() // 自 定义 函数 InitComm () 

{ // 代 码 中 变量 mm 表示 串口 控件 对 象 
mm-SetCommPort (n) // 将 串口 控件 与 指定 的 串口 号 相关 联 
mm.SetInputMode (1); // 设 置 接收 数据 的 类 型 为 文本 类 型 
mm.SetSsettings (str); // 设 置 串口 的 相关 参数 
mm.SetRThreshold (1); // 设 置 是 否 产生 串口 事件 
mm.SetInputLen (0); // 是 否 全 部 读 取 串 口 缓冲 区 中 的 数据 

if(! mm.GetPortOpen()) // 判 断 串口 是 否 已 经 打开 

{ 

mm.SetPortOpen (true) 7 // 如 果 处 于 关闭 状态 ， 则 将 端口 打开 


} 
} 


用 户 将 上 面 的 程序 保存 、 编 译 并 运行 ， 便 可 以 看 到 程序 运行 的 效果 。 如 果 用 户 计算 机 


上 的 串口 被 占用 或 是 不 能 使 用 ， 则 程序 会 弹出 错误 提示 ， 如 图 13.18 所 示 。 


- 使 用 三 5 未 口 控件 实现 囊 口 编程 


图 13.18 ”打开 串口 时 发 生 错 误 
如 果 用 户 打开 串口 成 功 ， 则 界面 中 的 各 个 功能 按钮 均 被 激活 ， 处 于 可 用 状态 。 代 码 如 
本 // 省 略 部 分 代码 
GetD1gItem(IDC RECVDATA) ->EnableWindow (true) ; // 设 置 各 个 功能 按钮 可 用 


GetDlgItem (IDC SAVEDATA) ->EnableWindow (true); 
GetDlgItem(IDC SENDDATA) ->EnableWindow (true); 


用 户 再 次 运行 程序 ， 成 功 打开 串口 后 ， 界 面 中 的 按钮 将 处 于 可 用 状态 ， 如 图 13.19 所 


在 本 节 中 ， 主 要 向 用 户 讲解 了 MSComm 控件 在 单 文 档 应 用 程序 中 的 参数 设置 以 及 初 


始 化 方法 .通过 本 节 的 学 习 ,用 户 应 该 可 以 掌握 单 文档 界面 的 设计 与 初始 化 , 以 及 MSComm 
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控件 的 参数 设置 等 。 如 用 户 未 能 完全 理解 ， 请 复习 第 12 章 以 及 本 节 中 的 相关 内 容 。 


13.19 ”打开 串口 成 功 


13.1.5 应 用 MSComm 控件 控制 串口 实例 


在 上 面 的 小 节 中 , 已 经 向 用 户 讲解 了 串口 参数 的 相关 设置 以 及 打开 串口 的 方法 。 所 以 ， 
在 本 节 中 ， 将 向 用 户 讲解 如 何 通过 串口 发 送 数据 与 接收 数据 等 编程 方法 。 


1. 发 送 串口 数据 


在 VC 平台 下 ， 如 果 用 户 使 用 串口 控件 进行 串口 通信 编程 。 那么 ， 用 户 需 要 在 程序 中 
调用 串口 控件 类 的 成 员 函 数 SetOutput0 进 行 数据 发 送 操作 。 但 是 ， 由 于 数据 通过 串口 进行 
发 送 或 接收 时 ， 必 须 将 数据 统一 转换 为 COleSafeArray 类 型 。 否 则 ， 数 据 发 送 或 接收 将 失 
败 。 

首先 ， 用 户 使 用 MFC 应 用 程序 向 导 为 “发 送 数据 ”按钮 添加 消息 响应 函数 
OnSenddata()。 然 后 ,在 该 函数 的 定义 中 ,使 用 串口 控件 对 象 mm 调用 其 成 员 函 数 SetOutput() 
将 数据 通过 串口 发 送出 去 。 代 码 如 下 : 


void CMyView: :OnSenddata() // 发 送 数 据 按钮 消息 响应 函数 
,| 
Cotring Str> // 定 义 字 符 串 变量 
char *a; // 定 义 字符 指针 
GetD1gItem(IDC_EDIT2) ->GetWindowText (str) ; // 获 取 用 户 输入 的 数据 
if(str.GetLength() !=0) // 判 断 用 户 输入 是 否 为 空 
{ 
for (int i=0;i<str.GetLength() ;i++) // 根 据 输入 数据 的 长 度 循环 获取 
各 个 字符 
a=str.GetBuffer (i); // 获 取 字 符 ， 并 赋予 字符 指针 
mm.SetOutput (COleVariant (a) ) ; // 调 用 串口 数据 发 送 函数 发 
送 数据 


memset (a, 0,1); // 将 字符 指针 赋 0 值 
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else // 若 用 户 输入 的 数据 为 空 


{ 
MessageBox (" 输 入 数据 不 能 为 空 ! ") ; // 提 示 用 户 不 能 输入 空 数据 


} 
| 


在 上 面 的 代码 中 ， 用 户 调用 函数 GetWindowText() 获 取 所 输入 的 数据 ， 并 且 判 断 该 数 
据 是 否 为 空 。 如 果 数 据 为 空 ， 则 提示 用 户 该 数据 输入 不 能 为 空 。 否 则 ， 调 用 串口 控件 类 的 
成 员 函 数 SetOutput(0 将 数据 通过 串口 发 送出 去 。 当 数据 发 送出 去 以 后 ， 用 户 需 要 将 字符 指 
针 重 新 设置 为 0。 当 用 户 输入 数据 为 空 或 者 没有 输入 数据 时 ， 单 击 “ 发 送 数据 ”按钮 ， 程 
序 会 弹出 错误 提示 ， 如 图 13.20 所 示 。 


13.20 用户 未 输入 数据 或 输入 数据 为 空 则 弹出 错误 提示 


如 果 用 户 通过 串口 发 送 数据 成 功 ， 则 程序 应 该 在 接收 消息 编辑 框 中 ， 显 示 数 据 发 送 成 
功 的 相关 信息 。 所 以 ， 用 户 应 该 添加 代码 如 下 : 

本 // 省 略 部 分 代码 

str1l1.Format ("用 户 发 送 数 据 成 功 !\r\n"); // 格 式 化 输出 字符 串 

GetDlgItem(IDC MSG) ->SetWindowText (str1); // 将 该 字符 串 输 出 到 消息 接收 框 中 显示 

那么 ， 用 户 在 发 送 数据 成 功 以 后 ， 程 序 将 在 消息 接收 框 中 ， 显 示 数 据 发 送 成 功 信息 ， 
如 图 13.21 所 示 。 

在 本 节 中 ， 向 用 户 讲解 了 使 用 串口 控件 通过 串口 发 送 数据 的 相关 编程 步骤 以 及 方法 。 
当然 , 用 户 在 发 送 数据 之 前 ， 最 好 再 次 判断 一 下 ,指定 的 串口 是 否 真 正 被 打开 或 是 被 占用 。 
这 样 ， 会 使 程序 使 用 更 安全 。 

全 注意 : 用 户 在 发 送 囊 口 数据 时 ， 必 须 将 数据 类 型 强制 转换 为 COleVariant 类 型 。 否 则 ， 


2. 接收 串口 数据 
用 户 使 用 串口 控件 进行 串口 通信 编程 ， 则 当 串 口 缓冲 区 中 有 数据 到 来 时 ， 该 串口 控件 
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会 产生 串口 事件 。 在 程序 中 ， 用 户 需 要 抓 住 串 口 控件 的 这 一 功能 特性 ， 在 串口 事件 中 ， 调 
用 相关 的 函数 对 串口 数据 进行 接收 即 可 。 


图 13.21 数据 发 送 成 功 后 的 界面 显示 


首先 , 使 用 应 用 程序 向 导 对 话 框 为 串口 控件 添加 事件 响应 函数 OnhComm(),， 如 图 13.22 
所 示 。 


MFC Class¥izard 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 

Broject: Class name: Add Class... 
串口 了 lcMyview 一 一 

E 忆 .4 串口 View.h E 忆 .串口 View.cpp 
Object IDs: 

IDC MSCOMM 


|IDC MSCOMM2 | 2 
IDC_MSG 

IDC_OPENCOM 

IDC_RECYDATA 

IDC_SAVEDATA 

IDC_SENDDATA 

Member functions: 

¥ DoDataExchange 

¥ OnBeginPrinting 

W OnClose ON_WM_CLOSE 

E OnComm ON_IDC_MSCOMM:OnComm 
V OnEndPrinting 


Description: 


Occurs whenever the value of the CommEvent property changes. 


图 13.22 为 串口 控件 添加 事件 响应 函数 


用 户 在 控件 ID 列表 中 , 选择 串口 控件 ID 以 后 , 由 于 其 仅 有 一 个 事件 响应 函数 。 因此 ， 
直接 单 击 Add Function 按钮 弹出 添加 成 员 函 数 对 话 框 。 在 该 对 话 框 中 ， 用 户 可 以 修改 串口 
事件 响应 函数 的 名 称 。 在 本 书 中 ， 用 户 将 该 名 称 设置 为 OnComm， 然 后 单 击 OK 按钮 即 可 
完成 串口 事件 响应 函数 的 添加 。 

实例 程序 中 ， 用 户 接受 串口 数据 的 功能 便 可 以 在 新 添加 的 串口 事件 响应 函数 中 实现 。 


"和 


其 代码 如 下 : 


void CMyDl1g: :OnComm() 
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VARIANT variant; 
COleSafeArray safearray; 


int len; 


char rxdata[1000]; 
CSstring str; 
if (mm.GetCommEvent ()==2) 


} 


variant= mm.GetInput (); 
safearray=variant; 
len=safearray.GetOneDimSize(); 
for (i=0;i<len;i++) 


// 串 口 事件 响应 函数 


// 定 义 VARIANT 类 型 的 变量 

// 定 义 CoOleSafeArray 类 对 象 
// 定 义 变量 

// 定 义 数组 

// 定 义 字 符 串 

// 若 发 生 的 串口 事件 是 读 取 事件 


// 读 取 串 口 缓冲 区 
// 转 换 数 据 类 型 
// 获 取 有 效 数据 的 长 度 


safearray.GetElement (&i, &rxdata[i]); // 将 数据 转换 为 CHAR 型 数组 


str.Format ("%c", rxdata); 
| 


MessageBox (str) 


// 格 式 化 输出 字符 串 
// 显 示 消息 框 


在 代码 中 , 函数 GetCommEvent() 的 作用 是 获取 当前 发 生 的 串口 事件 。 如 果 该 函数 返回 
值 为 2， 则 表示 当前 的 串口 事件 为 读 取 事件 。 

用 户 首先 调用 函数 GetCommEvent() 判 断 当前 发 生 的 串口 事件 是 否 为 读 取 事 件 。 如 果 该 
函数 返回 值 为 2， 则 说 明 当前 发 生 的 串口 事件 为 读 取 事 件 。 

接着 , 用户 调用 函数 GetInput() 读 取 串 口 缓冲 区 中 的 数据 并 返回 该 数据 的 类 型 。 用户 
将 返回 的 数据 类 型 强制 转换 为 COleSafeArray 类 型 , 并 调用 函数 GetOneDimSize() 获 取 数 据 
的 有 效 长 度 。 最 后 ， 使 用 函数 GetElement() 将 接收 到 的 每 个 数据 转换 为 char 数组 并 将 其 格 
式 化 进行 显示 。 

但 是 ， 在 该 实例 中 ， 需 要 将 接收 到 的 数据 显示 到 消息 接收 框 中 。 那 么 ， 用 户 只 能 将 显 
示 数 据 的 工作 交 给 界面 中 “接收 数据 ”按钮 的 消息 响应 函数 了 。 代 码 如 下 : 


void CMyView: :OnRecvdata() 


{ 


} 


CString str,strl; 
GetD1gItem(IDC_MSG) ->GetWindowText (str); 
str1.Format ("接收 到 的 数据 是 : $c"，rxdata); 


Er NTN 


str+=strl; 


str+="\r\n™"; 
GetD1gItem(IDC_MSG) ->SetWindowText (str); 


// 定 义 字符 串 

// 获 取消 息 接收 框 中 原 有 的 数据 
// 格 式 化 接收 到 的 数据 

// 添 加 换行 符 

// 连 接 数据 


// 设 置 消息 接收 框 中 的 数据 


在 代码 中 ， 变 量 rxdata 是 在 前 面 所 定义 的 字符 数组 变量 ， 用 于 接收 串口 数据 。 如 果 用 


户 按照 这 种 方式 显示 数据 ， 那 么 需要 将 该 变量 定义 为 工程 视图 类 的 成 员 变 量 。 和 否则， 用 户 
使 用 该 变量 将 发 生 错误 。 运 行程 序 ， 单 击 “ 接 收 数据 ”按钮 ， 程 序 会 将 接收 到 的 数据 显示 


在 接收 框 中 ， 如 图 13.23 所 示 。 
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从 注意: 由 于 用 户 在 通过 串口 发 送 数据 时 ， 是 将 数据 类 型 强制 转换 为 COleSafeArray 类 型 
的 。 所 以 ， 在 接收 数据 时 ， 需 要 使 用 COleSafeArray 类 的 成 员 浮 数 GetElement() 
将 接收 到 的 数据 转换 为 char 型 。 否则 ， 接 收 到 的 数据 将 不 能 被 识别 。 


数据 保存 方式 


wee] aa 
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图 13.23 显示 接收 到 的 数据 


在 本 节 中 ， 向 用 户 讲 解 了 在 VC 开发 环境 下 ， 使 用 串口 控件 开发 串口 通信 程序 的 步骤 
以 及 功能 实现 方法 等 。 通 过 本 节 的 学 习 ， 用 户 应 该 掌握 了 串口 控件 的 常用 属性 以 及 功能 函 
数 的 设置 方法 和 使 用 方法 。 


13.2 ”串口 API 编程 


在 13.1 节 中 ， 向 用 户 讲解 了 在 VC 开发 平台 中 ， 使 用 串口 控件 进行 串口 通信 编程 的 基 
本 步骤 以 及 方法 等 。 但 是 ， 在 Windows 平台 下 进行 串口 编程 还 可 以 使 用 API (应 用 程序 接 
口 ) 函数 实现 。 在 本 节 中 ， 将 主要 以 串口 API 函数 为 主 进行 串口 编程 ， 并 向 用 户 讲 解 其 原 
理 以 及 方法 。 


13.2.1 Windows API 串口 编程 概述 


在 Windows 平台 下 ， 串 口 其 实 可 以 被 视 为 一 种 特殊 的 文件 。 那 么 ， 串 口 操作 可 以 被 视 
为 一 种 文件 操作 。 

用 户 在 实际 编程 时 ， 可 以 使 用 文件 相关 的 API 函数 对 串口 进行 关联 或 者 操作 。 例 如 ， 
CreateFile0、ReadFile0 以 及 WriteFile0 等 。 如 果 用 户 使 用 函数 CreateFile0 关 联 串 口 COMI1 
并 返回 其 句柄 供 后 续 操 作 使 用 。 代 码 如 下 : 


HANDLE hModem; // 定 义 串 口 句柄 
Se” // 省 略 部 分 代码 
hModem=CreateFile ("COM1" ,GENERIC READ|GENERIC WRITE,0,0,OPEN EXISTING,F 


ILE ATTRIBUTE NORMAL,0); // 关 联 串口 并 返回 其 句柄 
Se // 省 略 部 分 代码 
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在 代码 中 ， 函 数 CreateFile0 将 创建 与 串口 COM1 相关 联 的 文件 ， 并 返回 其 句柄 。 用 户 
对 串口 的 后 续 操 作 ， 便 可 以 使 用 该 函数 返回 的 文件 句柄 进行 串口 的 相关 操作 。 


全 注意 : 用 户 在 创建 与 指定 囊 口 相关 联 的 文件 成 功 之 后 , 还 需要 调用 相关 的 API 函数 或 者 


结构 体 为 串口 设置 相应 的 参数 值 。 
13.2.2 API 串口 编程 中 用 到 的 结构 及 相关 概念 说 明 


用 户 使 用 串口 API 函数 进行 串口 通信 编程 时 , 需要 用 到 一 些 相 关 的 结构 体 或 者 是 函数 。 
在 本 节 中 ， 将 向 用 户 介绍 这 些 结构 体 的 定义 、 成 员 变量 以 及 函数 用 法 等 。 


1.， 串口 编程 相关 结构 体 


与 前 面 所 讲 的 串口 控件 一 样 , 使 用 串口 API 函数 也 需要 为 串口 设置 相关 的 参数 。 例 如 ， 
波 特 率 、 校 验方 式 等 参数 。 但 是 ， 在 串口 API 函数 编程 时 ， 这 些 参数 均 被 封装 到 了 一 个 结 


构 体 中 。 该 结构 体 定义 如 下 


typedef struct DCB { 
DWORD DCBlength; 
DWORD BaudRate; 
DWORD fBinary: 1; 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 
DWORD 


fparity:: 15 
fOutxCtsFlow:1; 
fOutxDsrFlow:1; 
fDtrControl:2; 
fDsrSensitivity:1; 
fTXContinueOnXoff:1; 
FOUEXS > 

ne 1 

fErrorChar: 1; 
ENOlL: 1 
fRtsControl:2; 

DWORD fAbortOnError:1; 
DWORD fDummy2:17; 

WORD wReserved; 

WORD 
WORD 
BYTE 
BYTE 
BYTE 


char 


XonLim; 
XoffLim; 
ByteSize; 
Parity; 
StopBits; 
XonChar; 
char XoffChar; 
char ErrorChar; 

char EofChar; 

char EvtChar; 

WORD wReservedl; 
} DCB; 


// 该 结构 的 大 小 

// 波 特 率 

// 是 否 选 择 停止 位 

// 是 否 产生 串口 事件 

//cTS 是 否 有 效 

//DSR 是 否 有 效 

//DTR 是 否 有 效 

// 检 测 DSR 是 否 接收 到 字符 

// 设 置 数 据 接收 类 型 

// 设 置 是 否 在 数据 到 来 时 启动 流 控制 
// 设 置 是 否 在 发 送 数据 时 启动 流 控 制 
// 是 否 使 用 奇偶 校 验 蔡 换 错误 

// 是 否 将 接收 到 的 数据 设置 为 空 

//RTS 流 控制 

// 是 否 强行 终止 发 生 的 错误 

// 该 参数 保留 

// 不 使 用 ， 必 须 设置 为 0 

/ /根据 该 变量 值 确定 发 送 数 据 最 低 的 字 节 数 
// 指 定 发 送 数 据 的 最 小 值 

// 串 口 数据 位 大 小 

// 指 定 串口 事件 的 类 型 

// 设 置 停止 位 

// 接 收 和 发 送 数据 时 ， 均 需要 设置 该 参数 
// 接 收 和 发 送 数据 时 ， 均 需要 设置 该 参数 
// 指 定 错误 字符 的 蔡 换 值 

// 数 据 结束 字符 

// 设 置 事件 字符 

// 保 留 ， 以 备 使 用 
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用 户 在 实际 编程 时 ， 需 要 填充 该 结构 体 以 便 设 置 串 口 的 参数 。 在 该 结构 体 中 ， 用 户 仅 
需要 使 用 其 中 的 几 个 即 可 。 例 如 ， 串 口 的 波 特 率 、 停 止 位 等 。 其 中 ， 参 数 BaudRate 的 取 值 
如 表 13.4 所 示 。 


表 13.4 参数 BaudRate 的 常用 取 值 


参数 取 值 含 义 

CBR 110 表示 将 波 特 率 设置 为 110 
CBR 300 表示 将 波 特 率 设置 为 300 
CBR 1200 表示 将 波 特 率 设置 为 1200 
CBR 2400 表示 将 波 特 率 设置 为 2400 
CBR 4800 表示 将 波 特 率 设置 为 4800 
CBR 9600 表示 将 波 特 率 设置 为 0600 
CBR 14400 表示 将 波 特 率 设置 为 14400 
CBR_19200 表示 将 波 特 率 设置 为 19200 
CBR 38400 表示 将 波 特 率 设置 为 38400 


在 表 13.4 中 ， 已 经 向 用 户 列举 了 部 分 常用 的 关于 波 特 率 的 取 值 。 在 实际 编程 时 ， 用 户 
可 以 根据 需要 为 串口 选择 合适 的 波 特 率 。 如 果 串 口 的 波 特 率 选择 不 合适 ， 用 户 不 但 不 能 达 
到 程序 的 预期 效果 ， 反 而 会 使 程序 的 稳定 性 受到 影响 。 

参数 StopBits 表示 停止 位 ， 其 参数 取 值 如 表 13.5 所 示 。 


表 13.5 参数 StopBits 的 常用 取 值 


参数 取 值 含 义 
ONESTOPBIT 指定 1 个 停止 位 
ONE5STOPBITS 指定 1.5 个 停止 位 
TWOSTOPBITS 指定 2 个 停止 位 


如 果 用 户 将 该 参数 取 值 为 ONESTOPBIT, 则 表示 用 户 将 通信 数据 的 停止 位 设置 为 1 个 
字 节 。 例 如 ， 用 户 将 通信 数据 的 停止 位 设置 为 1 个 字 节 。 代 码 如 下 : 

DCB dcb; // 定 义 DCB 结构 体 变量 

dcb. DCBlength=sizeof (dcb);  // 将 该 结构 体 的 大 小 赋予 成 员 变量 

dcb. StopBits= ONESTOPBIT; // 设 置 数据 的 停止 位 为 1 个 字 节 

ss // 省 略 部 分 代码 

用 户 在 编写 程序 时 ， 应 该 首先 定义 该 结构 体 的 变量 。 然 后 ， 再 将 该 结构 体 的 大 小 赋予 
变量 DCBlength， 用 户 才能 继续 填充 该 结构 体 中 的 成 员 变 量 。 例 如 ， 用 户 使 用 该 结构 体 设 
置 串口 参数 。 代 码 如 下 : 


// 省 略 部 分 代码 
DCB dcb; 
dcb. DCBlength=sizeof (dcb); // 将 该 结构 体 的 大 小 赋予 成 员 变 量 
dcb. BaudRate=9600; // 指 定 串 口 数据 传输 的 波 特 率 
// 省 略 部 分 代码 


当 用 户 将 该 结构 体 的 各 个 常用 变量 填充 完成 之 后 ， 便 可 以 调用 相关 的 API 函数 进行 串 
口 参数 设置 了 。 
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注意 : 关于 相关 功能 的 API 函数 将 在 以 下 内 容 中 向 用 户 讲解 。 
在 串口 编程 中 ， 还 有 一 个 重要 的 结构 体 ， 即 通信 超时 结构 体 。 其 具体 定义 如 下 : 


typedef struct COMMTIMEOUTS { 


DWORD ReadIntervalTimeout; // 数 据 读 取 超 时 设置 
DWORD ReadTotalTimeoutMultiplier; / /数据 读 取 时 间 系 数 
DWORD ReadTotalTimeoutConstant; / /数据 读 取 时 间 常 量 
DWORD WriteTotalTimeoutMultiplier; // 数 据 发 送 时 间 超 时 设置 
DWORD WriteTotalTimeoutConstant; / /数据 发 送 时 间 常 量 


} COMMTIMEOUTS, *LPCOMMTIMEOUTS; 


该 结构 体 的 主要 作用 是 设置 串口 数据 通信 操作 的 超时 设置 。 其 中 的 成 员 变量 都 是 以 毫 
秒 为 单位 。 在 通信 过 程 中 的 总 超时 时 间 计 算 公 式 为 :总 超时 = 时 间 系 数 X 要 求 读 / 写 的 字符 
数 + 时 间 常 量 。 

例如 ， 如 果 要 读 入 10 个 字符 ， 那 么 数据 读 取 操作 的 总 超时 时 间 的 计算 公式 为 

“ReadTotalTimeoutMultiplier * 10+ReadTotalTimeoutConstant”。 从 中 可 以 看 出 ， 间 隔 超时 
和 总 超时 的 设置 是 不 相关 的 ， 这 可 以 方便 串口 通信 程序 灵活 地 设置 各 种 超时 时 间 间 隔 。 

如 果 所 有 写 数 据 超 时 的 参数 均 设置 为 0， 表 示 不 使 用 该 超时 时 间 间 隔 。 如 果 
ReadIntervalTimeout 为 0， 表 示 不 使 用 数据 读 取 超 时 。 如 果 ReadTotalTimeoutMultiplier 和 
ReadTotalTimeoutConstant 都 为 0， 则 表示 不 使 用 数据 读 取 的 总 超时 。 如 果 数 据 读 取 间 隔 超 
时 被 设置 成 MAXDWORD， 并 且 将 数据 读 取 总 超时 设 为 0。 那 么 ， 用 户 在 读 取 一 次 输入 组 
冲 区 中 的 数据 后 ， 不 管 是 否 读 入 了 要 求 的 字符 ， 该 读 取 操作 都 会 被 立即 停止 。 


全 注意 : 一 般 情 况 下 ， 用 户 是 不 需要 设置 该 结构 体 中 的 任何 变量 的 ， 仅 使 用 其 默认 超时 间 
隔 即 可 。 但 是 ， 用 户 在 一 些 对 于 时 间 要 求 非常 严格 的 时 候 ， 便 需要 对 该 结构 体 进 
行 详细 的 设置 。 
2. 串口 编程 的 相关 API 函 数 


在 本 节 中 ， 将 向 用 户 重点 介绍 一 些 常用 的 串口 API 函数 。 并 且 将 使 用 这 些 API 函数 进 
行程 序 示例 的 编写 ， 使 用 户 能 够 更 深入 地 理解 这 些 函数 的 用 法 。 

首先 ， 当 用 户 使 用 函数 CreateFileO) 创 建 与 指定 串口 相关 联 的 文件 成 功 后 ， 便 可 以 使 用 
该 函数 返回 的 文件 句柄 进行 串口 参数 设置 。 例如， 用 户 为 串口 设置 相关 的 参数 。 代 码 如 下 : 


HANDLE hModem; // 定 义 串口 句柄 
hModem=CreateFile ("COM1",GENERIC READIGENERIC WRITE, 0,0,OPEN EXISTIN 
G, FILE FLAG OVERLAPPED,0) // 关 联 串 口 并 返回 其 句柄 

DCB dcb; // 定 义 DCB 结构 体 对 象 

dcb. DCBlength=sizeof (dcb); // 将 该 结构 体 的 大 小 赋予 成 员 变量 

dcb. BaudRate=9600; // 指 定 串 口 数据 传输 的 波 特 率 
dcb.ByteSize =8; // 设 置 串口 数据 位 大 小 为 8 个 字 节 

dcb.Parity = NOPARITY; / /串口 参数 设置 


dcb.StopBits = ONESTOPBIT; 
dcb.fBinary = TRUE; 
dcb.fParity = FALSE; 


然后 ， 当 用 户 将 DCB 结构 体 变量 中 的 常用 成 员 变 量 设置 完成 以 后 ， 便 可 以 调用 函数 
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SetCommState() 为 串口 指定 这 些 参数 了 。 该 函数 的 原型 如 下 : 


BOOL SetCommState (HANDLE hFile, LPDCB lpDCB ); 


该 函数 的 作用 是 为 串口 指定 相应 的 参数 。 其 中 ， 参 数 的 含义 如 下 : 

口 参数 hFile 表示 与 串口 相关 联 的 文件 句柄 ， 也 就 是 用 户 使 用 函数 CreateFile0 时 ， 所 
返回 的 句柄 值 。 

口 参数 lpDCB 是 指向 结构 体 DCB 的 变量 指针 。 

例如 ， 用 户 使 用 该 函数 为 串口 设置 相关 的 参数 ， 其 代码 如 下 : 


本 村 // 省 略 部 分 代码 
BOOL istrue; // 定 义 布尔 变量 
istrue=SetCommState (hModem, &dcb); // 调 用 函数 进行 参数 设置 
if(istrue) // 判 断 串口 参数 是 否 设置 成 功 
t 

MessageBox ("串口 参数 设置 成 功 ! "); // 若 参数 设置 成 功 ， 则 提示 用 户 


} 


else 


| 
MessageBox ("串口 参数 设置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 


如 果 用 户 还 需要 为 串口 设置 操作 超时 的 时 间 间 隔 ， 那 么 实现 该 功能 的 API 函数 是 
SetCommTimeouts()。 该 函数 原型 如 下 : 


BOOL SetCommTimeouts (HANDLE hFile,LPCOMMTIMEOUTS lpCommTimeouts); 


该 函数 的 作用 是 为 串口 设置 指定 的 操作 超时 间隔 。 其 参数 含义 如 下 
口 参数 hFile 表示 与 指定 串口 相关 联 的 文件 句柄 。 

口 参数 lpCommTimeouts 表示 指向 超时 时 间 间 隔 结构 体 变量 的 指针 。 
例如 ， 用 户 为 串口 设置 操作 超时 时 间 间 隔 。 代 码 如 下 : 


ee // 省 略 部 分 代码 
COMMTIMEOUTS con; // 定 义 结构 体 变量 
con. ReadIntervalTimeout=10; // 设 置 串口 数据 读 取 的 超时 时 间 
BOOL istrue; // 定 义 布尔 变量 
istrue= SetCommTimeouts (hModem，&con) ; // 调 用 函数 进行 参数 设置 
if (istrue) // 判 断 串 口 参数 是 否 设置 成 功 
1 

MessageBox (" 超 时 时 间 设 置 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 


else 
MessageBox (" 超 时 时 间 设置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 
// 省 略 部 分 代码 


在 上 面 的 代码 中 ， 用 户 将 串口 数据 的 读 取 超 时 时 间 设 置 为 10 毫秒 。 其 表示 当 有 数据 
到 达 串 口 缓冲 区 后 ， 读 取 数 据 的 线程 开始 从 缓冲 区 中 读 取 数 据 。 如 果 在 10 毫秒 内 ， 该 线程 
未 能 读 取 到 任何 数据 ， 那 么 线程 将 返回 。 

如 果 用 户 没有 为 程序 设置 操作 超时 时 间 间 隔 ， 那 么 程序 将 可 能 发 生 假死 现象 。 其 实 ， 
这 就 是 网 络 套 接 字 中 的 异步 模式 。 
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接 下 来 ， 用 户 需 要 为 串口 缓冲 区 指定 大 小 。 实 现 该 功能 的 API 函数 是 SetupComm()。 
函数 原型 如 下 : 


BOOL SetupComm (HANDLE hFile, DWORD dwInQueue,DWORD dwOutQueue); 


该 函数 将 为 指定 的 串口 缓冲 区 指定 大 小 。 其 部 分 参数 含义 如 下 : 

口 参数 dwInQueue 表示 接收 数据 的 缓冲 区 大 小 。 

口 参数 dwOutQueue 表示 发 送 数据 的 缓冲 区 大 小 。 

例如 ， 用 户 将 串口 的 接收 和 发 送 数据 缓冲 区 大 小 分 别 设 置 为 1024 和 512。 代 码 如 下 : 


ae // 省 略 部 分 代码 

SetupComm (hModem, 1024, 512); // 设 置 各 数据 缓冲 区 的 大 小 

Se // 省 略 部 分 代码 

在 代码 中 , 用户 使 用 函数 SetupComm() 将 指定 的 串口 数据 缓冲 区 大 小 分 别 设置 为 1024 
和 512。 

但 是 ， 当 用 户 不 使 用 串口 缓冲 区 或 者 程序 退出 时 ， 应 该 调用 函数 PurgeComm0) 清 除 串 
口 缓冲 区 中 的 所 有 内 容 。 该 函数 原型 如 下 : 

BOOL PurgeComm (HANDLE hFile,DWORD dwFlags); 

该 函数 执行 成 功 将 返回 tue， 和 否则 ， 函 数 将 返回 false。 其 参数 含义 如 下 : 


口 参数 hFile 表示 与 串口 相关 联 的 文件 句柄 。 
口 参数 dwFlags 表示 串口 缓冲 区 清除 标志 值 。 该 标志 值 如 表 13.6 所 示 。 


表 13.6 ”串口 缓冲 区 清除 标志 值 


取 值 含义 
PURGE TXABORT 禁止 向 接收 缓冲 区 中 写 入 数据 
PURGE RXABORT 禁止 向 发 送 缓冲 区 中 写 入 数据 
PURGE TXCLEAR 清除 接收 缓冲 区 中 的 内 容 
PURGE RXCLEAR 清除 发 送 缓冲 区 中 的 内 容 


例如 ， 用 户 将 前 面 所 指定 的 串口 缓冲 区 中 的 内 容 清除 。 代 码 如 下 : 


RE / /省略 部 分 代码 

BOOL istrue; // 定 义 布尔 变量 

istrue=PurgeComm(hModem, PURGE TXABORT| PURGE RXABORT| PURGE TXCLEAR| 
PURGE RXCLEAR); // 调 用 函数 对 缓冲 区 内 容 进行 清除 

if (istrue) // 判 断 清除 是 否 成 功 


MessageBox (" 缓 冲 区 数据 清除 成 功 ! ") ;  // 若 参数 设置 成 功 ， 则 提示 用 户 
} 


SEse 


MessageBox ("缓冲 区 数据 清除 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 
// 省 略 部 分 代码 
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全 注意 : 用 户 使 用 函数 PurgeComm() 清 除 囊 口 缓冲 区 中 的 内 容 时 ， 必 须 同时 为 其 指定 标志 
PURGE TXABORT| PURGE RXABORT， 防 止 程序 继续 向 缓冲 区 中 读 取 或 写 入 
数据 。 

在 本 节 中 ， 主 要 向 用 户 讲解 了 在 串口 通信 编程 中 ， 常 用 的 结构 体 以 及 函数 的 原型 和 使 

用 方法 等 。 同 时 ， 这 些 函数 也 是 串口 通信 编程 流程 中 的 重要 步骤 。 关 于 串口 事件 方面 的 知 

识 ， 将 在 13.2.3 节 中 向 用 户 进行 讲解 。 


13.2.3 ”串口 通信 事件 


在 串口 通信 中 , 如 果 指 定 的 串口 缓冲 区 有 数据 存在 时 , 程序 便 会 马上 读 取 其 中 的 数据 。 
那么 ， 程 序 是 怎么 知道 缓冲 区 中 有 数据 的 ? 实际 上 ， 这 个 功能 是 由 串口 的 硬件 部 分 所 实现 
的 。 也 就 是 当 数 据 到 达 缓 冲 区 时 , 串口 硬件 会 向 操作 该 串口 的 应 用 程序 发 送 相应 的 指令 码 。 
而 应 用 程序 则 根据 这 个 指令 码 进行 相关 的 操作 。 本 节 将 向 用 户 讲解 根据 串口 事件 ， 对 其 进 
行 读 取 和 写 入 数据 的 实现 方法 。 

1， 串 口 事件 

用 户 可 以 通过 API 函数 为 串口 指定 需要 处 理 的 串口 事件 。 例 如 ， 是 否 接收 到 串口 数据 
以 及 判断 发 送 缓冲 区 中 的 最 后 一 个 字符 是 否 为 空 等 。 实 现 这 些 功 能 的 API 函数 是 
SetCommMask0， 其 原型 如 下 : 

BOOL SetCommMask (HANDLE hFile, DWORD dwEvtMask) 

该 函数 的 作用 是 指定 用 户 所 感 兴趣 的 串口 事件 。 其 参数 含义 如 下 : 


口 参数 hFile 表示 与 串口 相关 联 的 文件 句柄 。 
口 参数 dwEvtMask 表示 相应 的 串口 事件 类 型 。 其 取 值 如 表 13.7 所 示 。 


表 13.7 ”串口 事件 类 型 


串口 事件 类 型 
EV_BREAK 收 到 BREAK 信 号 所 产生 的 串口 事件 
EV_CTS CTS 线 路 信号 发 生变 化 
EV_DSR DSR 线 路 信号 发 生变 化 
线路 状态 错误 ， 包 括 了 CE_FRAME、CE_OVERRUN、CE_RXPARITY 这 3 种 
EV_ERR 错误 
EV_RING 程序 检测 到 响 铃 信号 
EV _ RLSD CD 线路 信号 发 生变 化 
EV RXCHAR 串口 的 输入 缓冲 区 中 已 经 接收 到 数据 
EV_RXFLAG 使 用 SetCommsState0 函 数 设置 的 DCB 结 构 中 的 等 待 字符 已 被 传 入 输入 缓冲 区 中 
EV_TXEMPTY 串口 的 输出 缓冲 区 中 的 数据 已 经 全 部 被 发 送出 去 


在 本 书 中 ， 用 户主 要 是 通过 检测 缓冲 区 中 ， 是 否 有 数据 到 来 或 被 输出 ， 从 而 判断 程序 
是 否 读 取 或 发 送 缓冲 区 中 的 数据 。 所 以 ， 在 表 13.7 中 所 示 的 串口 事件 类 型 ， 用 户主 要 是 使 
用 串口 事件 EV_RXCHAR 和 EV_TXEMPTY。 例如 ， 用 户 在 程序 中 主要 检测 接收 和 发 送 事 
件 ， 则 使 用 函数 SetCommMask0 进 行 功能 实现 。 代 码 如 下 
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es // 省 略 部 分 代码 
BOOL istrue; // 定 义 布尔 变量 
istrue=SetCommMask (hModem, EV RXCHAR | EV TXEMPTY); 
// 设 置 串口 事件 的 类 型 
if(istrue) // 判 断 串口 事件 是 否 成 功 
下 
MessageBox (" 串 口 事件 设置 成 功 ! ") ; // 若 事件 设置 成 功 ， 则 提示 用 户 


else 


MessageBox (" 串 口 事件 设置 失败 ! 请 重 试 ") ; // 若 事件 设置 失败 ， 则 提示 用 户 重 试 

} 
ee // 省 略 部 分 代码 
当 用 户 设置 串口 事件 的 类 型 完成 后 , 便 可 以 等 待 串口 事件 的 发 生 了 。 在 Windows 平台 
等 待 串口 事件 的 发 生 是 通过 调用 API 函数 WaitCommEvent0 实 现 的 。 该 函数 原型 如 下 : 


BOOL WaitCommEvent (HANDLE hFile， 
LPDWORD lpEvtMask, LPOVERLAPPED lpOverlapped) ;// 指 定 等 待 的 串口 事件 


该 函数 的 作用 是 等 待 用 户 所 指定 的 串口 事件 发 生 。 如 果 用 户 指定 的 串口 事件 发 生 了 ， 
则 该 函数 将 返回 tue。 和 否则 ， 函 数 将 一 直 等 待 ， 直 到 有 相应 的 串口 事件 发 生 为 止 。 该 函数 
有 3 个 参数 ， 其 含义 分 别 如 下 : 
口 参数 hFile 表示 与 串口 相关 联 的 文件 句柄 。 
口 参数 IpEvtMask 接收 将 要 等 待 发 生 的 串口 事件 。 即 当 有 串口 事件 发 生 时 ， 该 函数 
将 把 这 个 已 经 发 生 的 事件 写 入 该 参数 中 。 
口 参数 lpOverlapped 表示 指向 结构 体 OVERLAPPED 的 指针 变量 ， 用 来 保存 程序 异 


下 


步 操作 的 结果 。 

例如 ， 用 户 调用 该 函数 等 待 串口 的 接收 事件 发 生 。 代 码 如 下 : 
Tn // 省 略 部 分 代码 
BOOL istrue; // 定 义 布尔 变量 
DWORD de=0; // 定 义 事件 保存 变量 
OVERLAPPED lpve; // 定 义 异 步 结构 变量 
istrue= WaitCommEvent (hModem, gde,&lpvc) // 等 待 事件 的 发 生 
if(istrue) // 判 断 事件 等 待 是 否 成 功 
{ 

// 省 略 部 分 代码 


和 二 
在 上 面 的 代码 中 ， 用 户 首先 调用 函数 WaitCommEventO 等 待 串口 事件 的 发 生 。 如 果 有 


串口 事件 发 生 ， 则 该 函数 返回 true。 那 么 ， 用 户 便 可 以 根据 变量 de 的 值 ， 来 判断 发 生 的 串 
口 事件 类 型 。 所 以 ， 用 户 在 上 面 代 码 的 省 略 处 添加 代码 如 下 : 


if(istrue) // 判 断 事件 等 待 是 否 成 功 
{ 
if ((dwEvtMask== EV RXCHAR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
{ // 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
// 用 户 需 要 在 此 处 调用 函数 读 取 数 据 


| 


如 果 用 户 等 待 的 串口 事件 与 发 生 的 串口 事件 相同 , 并 且 该 事件 是 串口 接收 事件 。 那么 ， 
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用 户 可 以 调用 函数 ReadFile0 对 串口 缓冲 区 中 的 数据 进行 读 取 。 关 于 串口 数据 读 取 相 关 的 
操作 将 在 后 面 进行 讲解 。 

本 节 主 要 向 用 户 讲解 了 怎样 实现 设置 串口 事件 类 型 以 及 等 待 串口 事件 的 发 生 。 并 且 当 
串口 事件 发 生 后 ， 根 据 所 发 生 的 串口 事件 判断 是 否 为 用 户 所 需要 的 串口 事件 。 


全 注 意 : 本 节 中 所 讲解 的 串口 事件 的 设置 与 相关 处 理 ， 实 际 上 与 本 书 前 面 所 讲 的 异步 套 接 
字 事 件 的 设置 与 处 理 是 相同 的 ， 请 用 户 回顾 前 面 所 讲 的 知识 点 。 


2. 接收 串口 数据 


上 面 内 容 已 经 向 用 户 讲解 了 怎样 判断 所 发 生 的 串口 事件 类 型 是 串口 的 数据 接收 事件 。 
下 面 将 调用 函数 ReadFileO 对 所 发 生 的 串口 事件 进行 响应 ， 并 读 取 缓冲 区 中 的 数据 。 

首先 ,用 户 判断 所 发 生 的 串口 事件 为 数据 接收 事件 后 , 需要 调用 函数 ClearCommError() 
清除 串口 错误 并 获取 串口 当前 的 状态 ， 以 便 用 户 获取 串口 缓冲 区 中 的 数据 大 小 。 该 函数 原 
型 如 下 : 


BOOL ClearCommError (HANDLE hFile, LPDWORD lpErrors, LPCOMSTAT lpSstat); 


如 果 该 函数 调用 成 功 ， 则 返回 tue。 和 否则 ， 该 函数 将 返回 false。 其 参数 及 含义 如 下 : 
口 参数 hFile 表示 与 串口 相关 联 的 文件 句柄 。 

口 参数 jpErrors 保存 将 要 清除 的 串口 错误 。 

口 参数 jpStat 是 指向 结构 体 COMSTAT 的 指针 变量 ， 用 于 保存 串口 当前 的 状态 值 。 


结构 体 COMSTAT 的 定义 如 下 : 

typedef struct COMSTAT { 
DWORD fCtsHold:1; / /等待 CTS 信号 的 到 来 
DWORD fDsrHold:1; / /等待 DSR 信号 的 到 来 
DWORD fRlsdHold:1; / /等待 RLSD 信号 的 到 来 
DWORD fxoffHold:1; / /等待 XOFF 字符 的 到 来 
DWORD fXoffSent:1; / /等待 XOFF 字符 的 发 送 
DWORD fEof:1; // 发 送 数据 结束 标志 
DWORD fTxim:1; / /等待 字符 
DWORD fReserved:25; // 保 留 ， 不 使 用 
DWORD cbInQue; / /串口 输 入 缓冲 区 中 的 字 节 数 
DWORD cbOoutQue; / /串口 输出 缓冲 区 中 的 字 节 数 


} COMSTAT, *LPCOMSTAT; 


例如 ， 用 户 获取 串口 输入 缓冲 区 中 的 数据 大 小 ， 则 可 以 调用 函数 ClearCommError() 获 
取 。 如 果 获 取 成 功 ， 则 输入 缓冲 区 中 的 数据 大 小 会 被 存放 在 结构 体 COMSTAT 的 成 员 变 量 
cbInQue 中 。 代 码 如 下 : 


if ((dwEvtMask== EV_RXCHRR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
{ // 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
DWORD doe; // 定 义 清除 的 错误 变量 
COMSTAT coms; // 定 义 结构 体 变量 
ClearCommError (hModem, &doe, &coms); // 清 除 串 口 事件 并 获取 当前 状态 
if(coms. cbInQue>0) // 判 断 串口 输入 缓冲 区 中 的 数据 大 小 
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// 若 大 于 0， 则 表示 接收 到 数据 
} 


用 户 根据 函数 ClearCommError0 获 取 到 的 缓冲 区 数据 大 小 ， 可 以 判断 该 缓冲 区 中 是 否 


有 数据 到 来 。 
然后 ， 用 户 可 以 调用 函数 ReadFile0 读 取 串 口 输入 缓冲 区 中 的 数据 。 该 函数 原型 如 下 : 


BOOL ReadFilel( 


HANDLE hFile, // 与 串口 相关 联 的 文件 句柄 
LPVOID lpBuffer, // 缓 冲 区 ， 用 于 存放 读 取 到 的 数据 
DWORD nNumberOfBytesToRead, // 需 要 读 取 的 数据 大 小 

LPDWORD lpNumberOfBytesRead, // 实 际 读 取 到 的 数据 大 小 
LPOVERLAPPED lpOverlapped // 指 向 结构 体 的 指针 变量 


); 

由 于 该 函数 在 前 面 的 章节 中 已 经 向 用 户 讲解 了 其 用 法 与 参数 含义 等 。 所 以 ， 在 这 里 主 
要 向 用 户 讲解 该 函数 的 最 后 一 个 参数 lpOverlapped。 在 本 节 中 ， 因 为 用 户 所 创建 的 串口 为 
异步 通信 模式 。 所 以 ， 用 户 必 须 将 这 里 的 参数 设置 为 非 空 。 代 码 如 下 : 


if (coms. cbInQue>0) // 判 断 串 口 输入 缓冲 区 中 的 数据 大 小 
{ 
char buffer[coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
OVERLAPPED *over; // 定 义 结构 体 指针 变量 
ReadFile (hModem, gbuffer, coms. cbInQue, data,over); 
// 读 取 缓 冲 区 中 的 数据 


} 


在 上 面 的 代码 中 ， 用 户 调用 函数 ReadFile0 以 异步 方式 对 串口 数据 进行 读 取 。 所 以 ， 
该 函数 不 会 等 待 其 操作 完成 后 才 返 回 ， 而 是 立即 返回 false。 并 且 ， 用 户 使 用 函数 
GetLastError() 获 取 到 的 错误 代码 是 ERROR IO_INCOMPLETE， 表 示 该 函数 正在 进行 读 取 
操作 。 

这 时 ， 用 户 可 以 调用 函数 GetOverlappedResult0 监 视 串 口 数据 的 大 小 变化 。 如 果 串 口 
输入 缓冲 区 中 还 有 数据 存在 ， 则 该 函数 将 返回 false。 和 否则 ， 该 函数 将 返回 tue。 那 么 ， 用 
户 通过 这 一 特性 ， 便 可 以 利用 循环 方式 一 直 监 视 串 口 缓冲 区 中 的 数据 变化 情况 ， 直 到 其 数 
据 为 空 。 代 码 如 下 : 


BOOL f£; // 定 义 布尔 变量 
f=ReadFile (hModem, sbuffer，coms 。 cbInQue, data,over); // 读 取 缓冲 区 中 的 数据 
ED) // 判 断 读 取 函数 的 返回 值 
{ 
BOOL my // 定 义 布尔 变量 
m=GetOverlappedResult (hModem，over，data,true); // 判 断 缓 冲 区 中 是 否 存 在 数据 
while (!m) // 如 果 存 在 ， 则 进入 循环 
1 
if (GetLastError() == ERROR IO PENDING) // 判 断 错 误 代码 


上 
m=GetOverlappedResult (hModem, over, data,true); // 继 续 调 用 函数 监视 缓 


冲 区 数据 
} 
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} 


当 程 序 循环 完毕 ， 则 表示 函数 ReadFileO) 已 经 将 串口 输入 缓冲 区 中 的 数据 全 部 读 取 。 
此 时 ， 用 户 便 可 以 将 缓冲 区 变量 buffer 中 的 数据 显示 出 来 即 可 。 


3. 发 送 串 口 数 据 


用 户 发 送 串口 数据 应 该 调用 API 函数 WriteFile0， 由 于 本 章 所 讲解 的 串口 操作 方式 为 
异步 通信 方式 。 所 以 ， 用 户 在 写 入 数据 时 ， 也 需要 将 写 操作 设置 为 异步 模式 。 因 此 ， 发 送 
串口 数据 的 基本 步 又 与 接收 串口 数据 的 基本 步骤 相同 。 代 码 如 下 : 


BOOL f; // 定 义 布尔 变量 

char buffer={" 通 过 串口 进行 数据 发 送 "} ; // 定 义 并 初始 化 发 送 字符 数组 
DWORD data=sizeof (buffer) ; // 获 取 将 写 入 数据 的 字 节 数 
DWORD datal,n=0; // 获 取 实 际 写 入 的 字 节 数 
f=WriteFile (hModem, gbuffer,， data,datal, over); // 写 入 缓冲 区 中 的 数据 
(UE // 判 断 写 入 函数 的 返回 值 
{ 

BOOL m; // 定 义 布尔 变量 
m=GetOverlappedResult (hModem，over，data,true); // 判 断 缓冲 区 中 是 否 剩余 数据 
while(lm) // 如 果 有 剩余 ， 则 进入 循环 

{ 

if (GetLastError() == ERROR IO PENDING) // 判 断 错误 代码 


{ 
m=GetOverlappedResult (hModem，over，data,true) ; // 继 续 调用 函数 监视 组 


冲 区 数据 
nt+=datal; // 将 实际 发 送 的 数据 进行 累加 
if (n==data) // 实 际 发 送 的 数据 大 小 等 于 原 大 小 
break; // 跳 出 循环 


} 


} 


4. 使 用 多 线程 处 理 读 操 作 


在 程序 中 ， 为 了 避免 出 现 程序 等 待 的 现象 发 生 ， 用 户 可 以 使 用 多 线程 编程 的 方法 将 串 
口 相关 的 写 数据 操作 放 在 线程 函数 中 进行 。 这 样 ， 不 仅 可 以 提高 程序 的 运行 效率 ， 还 可 以 
使 程序 在 非 阻 塞 模式 下 运行 。 

首先 , 用 户 需 要 在 程序 中 定义 一 个 全 局 的 线程 函数 并 将 其 命名 为 commdata。 为 了 使 该 
函数 能 在 必要 时 向 主 窗口 发 送 消息 ， 所 以 该 线程 函数 的 参数 设置 为 窗口 句柄 。 该 线程 函数 
定义 如 下 : 


DWORD WINAPI commdata (HWND h); // 线 程 函 数 定义 


然后 ， 在 程序 中 调用 函数 CreateThread0 创 建 线程 ， 并 启动 该 线程 。 该 函数 原型 如 下 : 


HANDLE CreateThread ( 
LPSECURITY ATTRIBUTES lpThreadAttributes, // 指 向 结构 体 的 指针 变量 
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DWORD dwSstackSize, // 初 始 化 线程 空间 大 小 
LPTHREAD START ROUTINE lpSstartAddress, // 线 程 函 数 地 址 
LPVOID lpParameter, // 线 程 函 数 的 参数 
DWORD dwCreationFlags, // 创 建 标志 

LPDWORD lpThreadId // 指 定 线程 ID 


); 
该 函数 创建 线程 成 功 ， 则 返回 该 线程 的 线程 句柄 。 否 则 ， 该 函数 将 返回 false。 如 果 该 


函数 的 参数 dwCreationFlags 设置 为 0， 则 表示 该 线程 创建 成 功 立 即 运行 。 例 如 ， 用 户 创建 
串口 操作 线程 。 代 码 如 下 : 


vt // 省 略 部 分 代码 
HANDLE hCommWatchThread; // 定 义 线程 句柄 
CreateThread (NULL,0, & commdata,this->GetSafeHwnd(),0, &dwThreadID ) 
// 创 建 线程 
RSSERT (hCommWatchThread!=NULL); // 判 断 线程 句柄 
// 省 略 部 分 代码 


在 程序 中 ， 用 户 指 定 线程 创建 成 功 后 ， 立 即 运行 。 接 下 来 ， 用 户 需 要 实现 线程 函数 的 
功能 了 。 代 码 如 下 : 


DWORD WINAPI commdata (HWND h) / /线程 函数 定义 
{ 
了 // 省 略 部 分 代码 
BOOL istrue; // 定 义 布尔 变量 
DWORD de=0; // 定 义 事件 保存 变量 
OVERLAPPED lpve; // 定 义 异 步 结构 变量 
istrue= WaitCommEvent (hModem, &de, &lpvc); // 等 待 事件 的 发 生 
if (istrue) // 判 断 事件 等 待 是 否 成 功 
{ 
if ((dwEvtMask== EV_RXCHRR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
{ // 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
DWORD doe; // 定 义 清除 的 错误 变量 
COMSTAT coms; // 定 义 结构 体 变 量 
ClearCommError (hModem, &doe, &coms); 
// 清 除 串口 事件 并 获取 当前 状态 
if(coms. cbInQue>0) // 判 断 串 口 输入 缓冲 区 中 的 数据 大 小 
char buffer[coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
OVERLAPPED *over; // 定 义 结构 体 指针 变量 
BOOL f£; // 定 义 布尔 变量 
f=ReadFile (hModem, gbuffer, coms. cbInoue,data,over) ; // 读 取 缓冲 区 中 的 数据 
(GE // 判 断 读 取 函 数 的 返回 值 
{ 
BOOL m; // 定 义 布尔 变 
m=GetOverlappedResult (hModem, over, data,true); ee 
while(!m) // 如 果 存 在 ， 则 进入 循环 
{ 
if (GetLastError() == ERROR IO PENDING) ， // 判 断 错 误 代 码 


{ 
m=GetOverlappedResult (hModem，over，data,true) ; // 继 续 调用 函数 监视 组 
冲 区 数据 
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在 程序 中 ， 函 数 WaitCommEventO 在 用 户 指定 的 串口 上 ， 等 待 相应 的 串口 事件 发 生 。 
若 没有 串口 事件 发 生 ， 则 该 函数 将 一 直 等 待 ， 直 到 有 串口 事件 发 生 为 止 。 若 该 函数 所 等 待 
的 串口 事件 发 生 ， 则 该 函数 返回 tue。 

接 下 来 , 用 户 需要 判断 所 发 生 的 串口 事件 是 否 是 串口 接收 事件 。 如果 是 串口 接收 事件 ， 
则 调用 函数 ClearCommError0 获 取 串 口 缓冲 区 中 的 数据 大 小 。 并 且 根 据 数据 大 小 定义 缓冲 
区 ， 使 用 函数 ReadFile0 将 这 些 数 据 全 部 保存 到 缓冲 区 中 。 由 于 在 本 章 中 ， 串 口 操作 均 为 
异步 模式 ， 所 以 函数 ReadFile0 也 采用 异步 模式 。 


公 注 意 : 在 while 循环 中 , 用 户 可 以 使 用 函数 GetOverlappedResultO 判 断 串 口 缓冲 区 中 的 数 
据 是 否 被 读 取 完 毕 。 该 函数 原型 如 下 : 
BOOL GetOverlappedResult( 


HANDLE hFile, // 与 串口 相关 联 的 文件 对 象 句柄 
LPOVERLAPPED lpOverlapped, // 指 向 结构 体 OVERLAPPED 的 指针 
LPDWORD lpNumberOfBytesTransferred,，// 指 向 实际 读 取 或 者 写 入 串口 的 字 节 数 


BOOL bwWait // 标 志 

); 

在 该 函数 中 ， 用 户 如 果 将 第 4 个 参数 bWait 设置 为 tue， 则 表示 该 函数 将 不 会 有 任何 

的 返回 值 ， 直 到 全 部 数据 操作 完成 。 如 果 将 该 参数 设置 为 false， 则 表示 该 函数 在 全 部 数据 

操作 完成 之 前 ,每 发 生 一 次 数据 变化 便 返 回 false。 但是， 用 户 可 以 使 用 函数 GetLastError() 

获取 错误 指令 ， 如果 该 指令 为 ERROR IO_PENDING， 则 表示 串口 缓冲 区 中 ,还 存在 数据 。 
当 用 户 使 用 该 函数 时 ， 一 般 是 以 循环 方式 调用 该 函数 监视 串口 缓冲 区 等 。 


13.2.4 OVERLAPPED 异步 I/O 重 倒 结构 


在 前 面 的 小 节 中 ， 用 户 均 使 用 异步 模式 创建 与 串口 关联 的 文件 ， 并 对 该 文件 进行 读 取 
和 写 入 操作 等 。 用 户 在 编程 时 ， 使 用 异步 模式 对 文件 进行 操作 ， 可 以 大 大 提高 程序 运行 的 
效率 。 异 步 编程 与 结构 体 OVERLAPPED 有 着 密切 的 关系 。 所 以 ， 在 本 节 中 ， 将 向 用 户 介 
绍 并 讲解 该 结构 体 的 定义 以 及 用 法 。 

当 用 户 在 创建 文件 或 其 他 操作 对 象 时 ， 为 其 指定 了 相应 的 属性 标志 
FILE FLAG OVERLAPPED， 则 表示 该 操作 对 象 是 基于 异步 模式 进行 操作 的 。 那 么 ， 在 后 
续 的 对 象 操作 中 ， 都 是 基于 异步 模式 进行 。 结 构 体 OVERLAPPED 的 定义 原型 如 下 : 

typedef struct OVERLAPPED { // 结 构 体 OVERLAPPED 定义 

DWORD Internal; 
DWORD InternalHigh; 
DWORD Offset; 

DWORD OffsetHigh; 


HANDLE hEvent; 
} OVERLAPPED; 


结构 体 OVERLAPPED 中 ， 有 5 个 参数 ， 其 作用 以 及 含义 如 下 。 
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参数 Internal: 该 参数 由 操作 系统 保留 ， 表 示 与 操作 系统 相关 的 状态 。 
参数 InternalHigh: 表示 发 送 或 接收 等 所 操作 数据 的 数据 长 度 。 

参数 Offset， 表示 文件 操作 开始 的 位 置 。 

参数 OffsetHigh: 表示 文件 操作 的 字 节 偏 移 量 。 

参数 hbEvent: 表示 文件 操作 后 ， 将 触发 的 事件 句柄 。 

例如 ， 用 户 在 异步 模式 下 ， 创 建 一 个 文件 。 代 码 如 下 : 

HANDLE hModem; // 定 义 串 口 句柄 


hModem=CreateFile ("COM1", GENERIC READ|GENERIC WRITE,0,0,OPEN EXISTIN 
G, FILE FLAG OVERLAPPED, 0); / /创建 异步 模式 文件 并 关联 串口 ， 返 回 其 句柄 


在 代码 中 , 用 户 创 建 与 串口 相关 联 的 文件 时 , 将 其 属性 设置 为 FILE FLAG_OVERLAPPED， 
表示 创建 的 该 文件 为 异步 访问 模式 。 

异步 访问 模式 的 文件 创建 成 功 之 后 , 用 户 使 用 函数 ReadFile() 和 WriteFile() 操 作 该 异步 
模式 文件 时 ， 都 需要 将 这 两 个 函数 设置 为 异步 模式 。 例 如 ， 用 户 使 用 这 两 个 函数 以 异步 模 
式 对 文件 进行 读 写 操作 。 代 码 如 下 : 


DODODO 


本 // 省 略 部 分 代码 
char buffer[coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
OVERLAPPED *over; // 定 义 结构 体 指针 变量 
BOOL flag=ReadFile (hModem, gbuffer, coms. cbInQue, data,over); 
// 读 取 缓 冲 区 中 的 数据 
if(!flag) // 判 断 数据 读 取 操 作 是 否 成 功 
{ 
MessageBox ("数据 读 取 成 功 !") ; // 提 示 用 户 数 据 读 取 成 功 
} 
else 
L 
MessageBox ("数据 读 取 失 败 !") ; // 若 数据 读 取 失 败 ， 则 提示 用 户 
} 
BOOL f=WriteFile(hModem, gbuffer，data,datal,over); // 写 入 缓冲 区 中 的 数据 
EEL) // 判 断 数据 写 入 是 否 成 功 
{ 
MessageBox ("数据 写 入 成 功 !"); // 若 数据 写 入 成 功 ， 则 提示 用 户 
} 
else 
MessageBox ("数据 写 入 失败 !1") ; // 若 数据 写 入 失败 ， 则 提示 用 户 
} 
// 省 略 部 分 代码 


在 上 面 的 代码 中 ,用 户 使 用 函数 ReadFile0 和 WriteFile0 分 别 对 文件 进行 读 写 操作 。 但 
是 ， 值 得 用 户 注意 的 是 在 设置 其 参数 时 ， 其 最 后 一 个 参数 一 定 不 能 为 NULL。 和 否则 ， 这 两 
个 函数 将 不 能 以 异步 模式 对 文件 进行 读 写 。 

在 上 面 的 例子 程序 中 ， 用 户 还 可 以 使 用 宏 READ_OS 和 WRITE OS 对 函数 ReadFile0 
和 WiriteFile0 的 最 后 一 个 参数 进行 设置 。 这 样 ， 用 户 可 以 不 再 重新 定义 结构 体 
OVERLAPPED 的 变量 了 。 例如 ， 使 用 宏 READ OS 和 WRITE OS 对 文件 操作 设置 异步 模 
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式 。 代 码 如 下 : 
车 // 省 略 部 分 代码 
istrue= WaitCommEvent (hModem, gdqe,&lpvc); // 等 待 事件 的 发 生 
if(istrue) / /判断 事件 等 待 是 否 成 功 
{ 
if ((dwEvtMask== EV RXCHAR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
{ // 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
DWORD doe; // 定 义 清除 的 错误 变量 
COMSTAT coms; // 定 义 结构 体 变量 
ClearCommError (hModem, gdoe,&coms) ; // 清 除 串口 事件 并 获取 当前 状态 
if(coms. cbInQue>0) // 判 断 串口 输入 缓冲 区 中 的 数据 大 小 
{ 
char buffer[coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
OVERLRPPED *over; // 定 义 结构 体 指针 变量 
BOOL f£; // 定 义 布尔 变量 
f=ReadFile (hModem, gbuffer, coms. cbInQue,data, READ OS (npTTYInfo) ) ; 
// 读 取 缓 冲 区 中 的 数据 
EE (0 // 判 断 读 取 函数 的 返回 值 
I 
BOOL m; // 定 义 布尔 变量 
m=GetOverlappedResult (hModem, READ OS (npTTYInfo), data,true); 
// 判 断 缓 冲 区 中 是 否 存在 数据 
while(lm) // 如 果 存 在 ， 则 进入 循环 
{ 
if (GetLastError() == ERROR IO PENDING)  // 判 断 错误 代码 


{ 
m=GetOverlappedResult (hModem, READ OS (npTTYInfo), data,true); 
/ /继续 调用 函数 监视 缓冲 区 数据 
} 
} 
BOOL f=WriteFile(hModem, gbuffer, data,datal, WRITE OS (npTTYInfo) ) 


// 写 入 缓冲 区 中 的 数据 
EEE) // 判 断 数据 写 入 是 否 成 功 
MessageBox ("数据 写 入 成 功 !"); // 若 数据 写 入 成 功 ， 则 提示 用 户 
Ee 
, MessageBox ("数据 写 入 失败 !"); // 若 数据 写 入 失败 ， 则 提示 用 户 
// 省 略 部 分 代码 


全 注意 : 如 果 用 户 使 用 宏 READ OS 和 WRITE OS 对 函数 ReadFile0 和 WriteFile0 的 最 后 
一 个 参数 进行 设置 ， 那么 ， 在 部 数 GetOverlappedResult0 〇 站 中， 同样 需要 将 其 中 的 
相应 参数 设置 为 一 样 。 否 则 ， 程 序 运 行 时 ， 将 发 生 逻 辑 错 误 。 

在 本 节 中 ， 主 要 向 用 户 讲解 了 结构 体 OVERLAPPED 的 定义 以 及 各 个 成 员 变量 的 含义 

等 。 并 且 举 例 说 明了 在 创建 文件 和 读 写 文件 时 ， 使 用 该 结构 体 的 技巧 与 步骤 等 。 用 户 可 以 

通过 本 节 的 知识 ， 编 写 代 码 打造 自己 的 异步 文件 操作 程序 。 
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13.2.5 ”Win32 API 串口 通信 编程 的 一 般 流程 


用 户 在 前 面 的 学 习 中 , 已 经 对 串口 编程 的 相关 过 程 以 及 方法 有 了 进一步 的 了 解 。 所 以 ， 
本 节 将 具体 地 向 用 户 介绍 在 Win32 环境 下 ， 使 用 API 函数 进行 串口 通信 编程 的 一 般 流程 。 


1. 打开 串口 


当 程 序 初始 化 时 ， 用 户 需 要 打开 串口 并 创建 与 该 串口 相关 联 的 文件 。 代 码 如 下 : 


HANDLE hModem; // 定 义 串 口 句柄 
hModem=CreateFile ("COM1", GENERIC READ|GENERIC WRITE,0,0,O0PEN 


EXISTING, FILE FLAG OVERLAPPED,0); // 关 联 串 口 并 返回 其 句柄 
从 注意 : 用 户 在 使 用 函数 CreateFile() 创 建 与 串口 相关 联 的 文件 时 ， 必 须 将 该 文件 的 相关 属 
性 设置 为 FILE FLAG_OVERLAPPED。 和 否则 ， 用 户 所 创建 的 文件 将 不 能 实现 异 
步 操作 。 


2. 设置 串口 参数 


用 户 可 以 调用 函数 SetCommState() 对 串口 进行 相应 参数 的 设置 。 但 是 ， 用 户 需 要 首先 
对 串口 参数 结构 体 DCB 进行 初始 化 操作 。 代 码 如 下 : 


DCB dcb; // 定 义 DCB 结构 体 对 象 

dcb. DCBlength=sizeof (dcb); // 将 该 结构 体 的 大 小 赋予 成 员 变量 

dcb. BaudRate=9600; // 指 定 串口 数据 传输 的 波 特 率 
dcb.ByteSize =8; // 设 置 串口 数据 位 大 小 为 8 个 字 节 

dcb.Parity = NOPARITY; // 串 口 参数 设置 


dcb.StopBits = ONESTOPBIT; 
dcb.fBinary = TRUE; 
dcb.fParity = FALSE; 


然后 ， 用 户 便 可 以 使 用 函数 SetCommState0 对 串口 参数 进行 设置 了 。 代 码 如 下 : 


BOOL istrue; // 定 义 布尔 变量 
istrue=SetCommState (hModem, &dcb); // 调 用 函数 进行 参数 设置 
if (istrue) // 判 断 串 口 参数 是 否 设置 成 功 


{ 
MessageBox (" 串 口 参数 设置 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 
} 


else 


MessageBox ("串口 参数 设置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 


3. 设置 操作 超时 时 间 间 隔 
用 户 设置 完 串口 的 相关 参数 后 ， 应 该 对 串口 操作 的 时 间 间 隔 进行 设置 。 这 样 ， 当 串口 
操作 的 时 间 间 隔 超出 用 户 所 设置 的 时 间 时 ， 操 作 函 数 将 被 强制 返回 ， 避 免 程序 假死 。 其 代 
码 如 下 : 
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es / /省略 部 分 代码 
COMMTIMEOUTS con; // 定 义 结构 体 变量 
con. ReadIntervalTimeout=10; // 设 置 串口 数据 读 取 的 超时 时 间 
BOOL istrue; // 定 义 布尔 变量 
istrue= SetCommTimeouts (hModem, &con); // 调 用 函数 进行 参数 设置 
if (istrue) // 判 断 串口 参数 是 否 设置 成 功 
人 
MessageBox (" 超 时 时 间 设 置 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 


} 
else 


t 
MessageBox ("超时 时 间 设 置 失 败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 


} 

在 程序 中 ， 用 户主 要 是 依靠 结构 体 COMMTIMEOUTS 中 的 成 员 变量 ReadIntervalTimeout 
对 串口 操作 的 超时 时 间 间 隔 进行 设置 的 。 

4. 设置 串口 缓冲 区 

现在 ， 用 户 可 以 调用 函数 对 串口 的 数据 缓冲 区 进行 设置 ， 实 现 其 功能 的 API 函数 是 
SetupComm()。 代 码 如 下 : 


Ss // 省 略 部 分 代码 
SetupComm (hModem, 1024, 512); // 设 置 各 数据 缓冲 区 的 大 小 


当 用 户 在 程序 退出 或 者 其 他 原因 ， 不 再 需要 使 用 串口 缓冲 区 时 ， 应 该 将 其 中 的 内 容 进 
行 清除 操作 并 析 构 该 缓冲 区 。 和 否则 ， 当 下 次 再 使 用 时 ， 程 序 将 发 生 错误 。 代 码 如 下 


// 省 略 部 分 代码 

BOOL istrue; // 定 义 布尔 变量 

istrue=PurgeComm(hModem, PURGE TXABORT| PURGE RXABORT| PURGE TXCLEAR| 
PURGE RXCLEAR); // 调 用 函数 对 缓冲 区 内 容 进行 清除 

if (istrue) // 判 断 清除 是 否 成 功 


{ 


MessageBox (" 缓 冲 区 数据 清除 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 
} 


else 


MessageBox ("缓冲 区 数据 清除 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 


5. 设置 串口 事件 


接 下 来 ， 用 户 便 可 以 根据 实际 应 用 设置 串口 的 事件 ， 并 调用 函数 WaitCommEventO 对 
串口 进行 监视 。 若 有 相应 的 串口 事件 发 生 ， 则 返回 。 和 否则 ， 程 序 将 在 串口 上 一 直 等 待 事件 
的 发 生 。 代 码 如 下 : 


// 省 略 部 分 代码 
BOOL istrue; // 定 义 布尔 变量 
istrue=SetCommMask (hModem, EV RXCHAR | EV TXEMPTY); 

// 设 置 串口 事件 的 类 型 
if (istrue) // 判 断 串口 事件 是 否 成 功 


Ul 


MessageBox ("串口 事件 设置 成 功 ! ") ; // 若 事件 设置 成 功 ， 则 提示 用 户 成 功 
} 
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else 
{ 
MessageBox ("串口 事件 设置 失败 ! 请 重 试 ") ; // 若 事件 设置 失败 ， 则 提示 用 户 重 试 
} 
BOOL istruel; // 定 义 布尔 变量 
DWORD de=0; // 定 义 事件 保存 变量 
OVERLAPPED lpve; // 定 义 异步 结构 变量 
Istruel= WaitCommEvent (hModem, &de,&lpvc); // 等 待 事件 的 发 生 
if(istruel) // 判 断 事件 等 待 是 否 成 功 
{ 
MessageBox ("串口 事件 设置 成 功 ! ") ; // 若 事件 等 待 成 功 ， 则 提示 用 户 成 功 
} 
else 


MessageBox (" 串 口 事件 设置 失败 ! 请 重 试 ") ; // 若 事件 等 待 失 败 ， 则 提示 用 户 重 试 
} 


在 代码 中 ， 用 户 首先 为 串口 设置 串口 事件 。 然 后 ， 在 相应 的 串口 上 等 待 串口 事件 发 生 
并 进行 相应 的 处 理 。 
6. 读 写 串口 


通过 以 上 几 个 步 又， 关于 串口 的 相关 参数 设置 以 及 串口 事件 指定 等 操作 已 经 基本 完 
成 。 那 么 ， 用 户 便 可 以 对 串口 进行 读 写 操作 了 。 其 代码 如 下 : 


: // 省 略 部 分 代码 
if ((dwEvtMask== EV_RXCHAR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
{ // 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
DWORD doe; // 定 义 清除 错误 的 变量 
COMSTAT coms; // 定 义 结构 体 变量 
ClearCommError (hModem, &doe, &coms); // 清 除 串 口 事件 并 获取 当前 状态 
if (coms 。 cbInoue>0) // 判 断 串 口 输入 缓冲 区 中 的 数据 大 小 
4 
char buffer[coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
OVERLAPPED *over; // 定 义 结构 体 指针 变量 
BOOL f£; // 定 义 布尔 变量 
f=ReadFile (hModem, gbuffer，coms. cbInQue, data,over); // 读 取 缓 冲 区 中 的 数据 
(ED // 判 断 读 取 函数 的 返回 值 
{ 
BOOL m; // 定 义 布尔 变量 
m=GetOverlappedResult (hModem，over，data,true);// 判 断 缓冲 区 中 是 否 存 在 数据 
while(!m) // 如 果 存 在 ， 则 进入 循环 


{ 
if (GetLastError() == ERROR IO PENDING) ， // 判 断 错 误 代 码 


m=GetOverlappedResult (hModem, over, data,true); 


/ /继续 调用 函数 监视 缓冲 区 数据 


} 


} 
BOOL f=WriteFile(hModem, gbuffer, data,datal, WRITE OS (npTTYInNf0)); 


// 写 入 缓冲 区 中 的 数据 
宇和 (有 // 判 断 数 据 写 入 是 否 成 功 
汪 
MessageBox ("数据 写 入 成 功 !"); // 车 数据 写 入 成 功 ， 则 提示 用 户 成 功 
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} 
else 
{ 
MessageBox ("数据 写 入 失败 !1") ; // 若 数据 写 入 失败 ， 则 提示 用 户 失败 
} 
} 
1 
} 
在 本 节 中 ， 主 要 向 用 户 介绍 了 基于 API 函数 进行 串口 通信 编程 的 基本 流程 。 并 结合 六 


面 所 讲解 的 程序 实例 代码 向 用 户 讲解 每 个 步骤 的 编程 方法 等 。 
13.2.6 ”同步 串口 读 写 数据 

在 前 面 的 小 节 中 ， 向 用 户 讲解 的 串口 操作 等 均 是 基于 异步 模式 的 。 所 以 ， 为 了 使 读者 
将 异步 和 同步 模式 区 分 开 来 ， 本 节 将 向 用 户 讲解 同步 模式 下 的 串口 编程 。 

1. 基本 概念 


同步 模式 是 指 程序 中 的 代码 是 以 顺序 执行 的 ， 即 后 面 的 程序 必须 等 待 前 面 的 程序 全 部 
执行 并 返回 后 ， 才 能 继续 执行 。 例 如 ， 用 户 使 用 函数 ReadFile0 对 文件 进行 读 取 操作 ， 只 
要 该 函数 正在 进行 数据 读 取 并 没有 返回 时 ， 后 面 的 程序 只 能 等 待 其 返回 。 

用 户 使 用 这 种 模式 编写 的 程序 具有 很 大 的 局 限 性 ， 容 易 造成 程序 的 假死 ， 从 而 破坏 程 
序 界面 的 友好 性 。 因 此 ， 一 般 情况 下 ， 不 建议 用 户 使 用 这 种 模式 进行 编程 。 


2. 使 用 同步 方式 对 串口 进行 操作 


用 户 仅仅 需要 将 前 面 的 实例 程序 进行 修改 ， 便 可 以 实现 同步 模式 下 的 串口 操作 。 代 码 
如 下 : 


HANDLE hModem; // 定 义 串口 句柄 

hModem=CreateFile ("COM1", GENERIC READ|GENERIC WRITE,0,0,OPEN EXISTING, 

FILE ATTRIBUTE NORMAL,O0); // 关 联 串 口 并 返回 其 句柄 

DCB dcb; // 定 义 DCB 结构 体 对 象 

dcb. DCBlength=sizeof (dcb); // 将 该 结构 体 的 大 小 赋予 成 员 变量 

dcb. BaudRate=9600; // 指 定 串 口 数据 传输 的 波 特 率 
dcb.ByteSize =8; // 设 置 串口 数据 位 大 小 为 8 个 字 节 

dcb.Parity = NOPARITY; // 串 口 参数 设置 


dcb.StopBits = ONESTOPBIT; 
dcb.fBinary = TRUE7 
dcb.fParity = FALSE; 


BOOL istrue; // 定 义 布尔 变量 

istrue=SetCommState (hModem, &dcb); // 调 用 函数 进行 参数 设置 

if(istrue) // 判 断 串口 参数 是 否 设置 成 功 

{ 

MessageBox ("串口 参数 设置 成 功 ! "); // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 
} 

else 


{ 

MessageBox ("串口 参数 设置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 

COMMTIMEOUTS con; // 定 义 结构 体 变量 
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con. ReadIntervalTimeout=107 

BOOL istrue; 

istrue= SetCommTimeouts (hModem, 

if(istrue) 

‘ 

MessageBox ("超时 时 间 设 置 成 功 ! "); 
} 

else 


{ 


MessageBox ("超时 时 间 设 置 失败 ! 请 重 试 ") ; 


} 
SetupComm (hModem, 1024, 512); 
BOOL istrue; 


// 设 置 串口 数据 读 取 的 超时 时 间 
// 定 义 布尔 变量 

// 调 用 函数 进行 参数 设置 

// 判 断 串 口 参数 是 否 设置 成 功 


// 若 参数 设置 成 功 ， 则 提示 用 户 成 功 


// 若 参数 设置 失败 ， 则 提示 用 户 重 试 


// 设 置 各 数据 缓冲 区 的 大 小 
// 定 义 布尔 变量 


istrue=PurgeComm (hModem, PURGE TXABORT|PURGE RXABORT|PURGE TXCLEAR| 


PURGE RXCLEAR); 
if(istrue) 


{ 


MessageBox ("缓冲 区 数据 清除 成 功 ! ") ; 


} 


else 


il 


MessageBox ("缓冲 区 数据 清除 失败 ! 请 重 试 ") ; 


} 
BOOL istrue; 


// 调 用 函数 对 缓冲 区 内 容 进行 清除 
// 判 断 清除 是 否 成 功 


// 若 参数 设置 成 功 ， 则 提示 用 户 成 功 


// 若 参数 设置 失败 ， 则 提示 用 户 重 试 
// 定 义 布尔 变量 


istrue=SetCommMask (hModem，EV_RXCHRR | EV_TXEMPTY) 


if(istrue) 


{ 


MessageBox ("串口 事件 设置 成 功 ! ") ; 
: 


else 


MessageBox ("串口 事件 设置 失败 ! 请 重 试 ") ; 


} 
BOOL istruel; 
DWORD de=0; 


istruel= WaitCommEvent (hModem, &de,NULL); 
/ /等待 事件 的 发 生 必须 将 第 三 个 参数 设置 为 NULL 


if(istruel) 


MessageBox ("串口 事件 等 待 成 功 ! ") ; 


DWORD de=0; 
if(istrue) 
i 
if ((dwEvtMask== EV_RXCHAR) 
| 
DWORD doe; 
COMSTAT coms; 


// 设 置 串口 事件 的 类 型 
// 判 断 串 口 事件 是 否 成 功 


// 若 事件 设置 成 功 ， 则 提示 用 户 成 功 


// 若 事件 设置 失败 ， 则 提示 用 户 重 试 


// 定 义 布尔 变量 
// 定 义 事件 保存 变量 


// 判 断 事件 等 待 是 否 成 功 


// 若 事件 等 待 成 功 ， 则 提示 用 户 成 功 
// 定 义 事件 保存 变量 
// 判 断 事件 等 待 是 否 成 功 


// 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
// 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
// 定 义 清除 的 错误 变量 

// 定 义 结构 体 变量 


ClearCommError (hModem, &doe, tcoms); 


if(coms. cbInQue>0) 


{ 


char buffer[coms. cbInQue]={0}; 


DWORD data; 


// 清 除 串口 事件 并 获取 当前 状态 
// 判 断 串口 输入 缓冲 区 中 的 数据 大 小 


// 定 义 并 初始 化 缓冲 区 
// 存 放 实际 读 取 到 的 字 节 数 
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BOOL f£; // 定 义 布尔 变量 

f=ReadFile (hModem, gbuffer, coms. cbInQue,data,NULL); 

// 读 取 缓 冲 区 中 的 数据 
if(!f£) // 判 断 读 取 函数 的 返回 值 
{ 
BOOL m; // 定 义 布尔 变量 
m=GetOverlappedResult (hModem, NULL, data,true); 

// 判 断 缓冲 区 中 是 否 存在 数据 
while(lm) // 如 果 存 在 ， 则 进入 循环 


{ 
if (GetLastError() == ERROR IO PENDING)  // 判 断 错误 代码 


m=GetOverlappedResult (hModem, NULL, data,true); 


// 继 续 调用 函数 监视 缓冲 区 数据 
} 
} 
} 
} 
|， 
2 // 省 略 部 分 代码 
BOOL f=WriteFile(hModem, gbuffer, data,datal, NULL); 
// 写 入 缓冲 区 中 的 数据 
(WE) // 判 断 数据 写 入 是 否 成 功 
{ 
MessageBox ("数据 写 入 成 功 !"); // 若 数据 写 入 成 功 ， 则 提示 用 户 成 功 
} 
else 
{ 
MessageBox ("数据 写 入 失败 !") ; // 若 数据 写 入 失败 ， 则 提示 用 户 失 败 
} 
else 


MessageBox ("串口 事件 等 待 失 败 ! 请 重 试 ") ; 
// 若 事件 等 待 失败 ， 则 提示 用 户 重 试 


在 上 面 的 代码 中 ， 用 户 创建 文件 时 ， 必 须 将 该 函数 所 创建 的 文件 属性 设置 为 NULL。 
然后 ， 当 使 用 函数 ReadFile0 和 WriteFile0 对 文件 进行 操作 时 ， 都 需要 将 相应 的 参数 设置 为 
NULL。 和 否则 ， 程 序 将 不 能 对 一 个 同步 文件 进行 读 写 操作 。 


13.2.7 ”Win32 API 串口 编程 实例 


本 节 将 结合 前 面 所 讲 的 知识 ， 向 用 户 讲解 如 何 使 用 API 函数 进行 串口 编程 实例 的 相关 
方法 。 为 了 使 用 户 能 够 区 分 MFC 串口 控件 编程 和 API 串口 编程 的 不 同 之 处 ， 这 里 所 使 用 
的 实例 界面 仍然 是 MFC 串口 控件 编程 所 使 用 过 的 界面 。 


1. 打开 串口 


用 户 可 以 在 界面 中 打开 串口 按钮 的 消息 响应 函数 OnOpencom0O 中 ， 使 用 API 函数 将 指 
定 的 串口 打开 。 代 码 如 下 : 
void CMyView: :OnOpencom() // 打 开 串 口 按钮 消息 响应 函数 
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HANDLE hModem; // 定 义 串 口 句柄 
hModem=CreateFile ("COM1", GENERIC READ|GENERIC WRITE,0,0,OPEN EXISTING, 
FILE ATTRIBUTE NORMAL,O0); // 关 联 串口 并 返回 其 句柄 
DCB dcb; // 定 义 DCB 结构 体 对 象 
dcb. DCBlength=sizeof (dcb); // 将 该 结构 体 的 大 小 赋予 成 员 变 量 
dcb. BaudRate=9600; // 指 定 串口 数据 传输 的 波 特 率 
dcb.ByteSize =8; // 设 置 串口 数据 位 大 小 为 8 个 字 节 
dcb.Parity = NOPARITY; / /串口 参数 设置 


dcb.StopBits = ONESTOPBIT; 
dcb.fBinary = TRUE; 
dcb.fParity = FALSE; 


BOOL istrue; // 定 义 布尔 变量 

istrue=SetCommState (hModem, &dcb); // 调 用 函数 进行 参数 设置 

if(istrue) // 判 断 串口 参数 是 否 设置 成 功 

下 

MessageBox (" 串 口 参数 设置 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 
} 

else 


{ 
MessageBox (" 串 口 参数 设置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
| 


COMMTIMEOUTS con; // 定 义 结构 体 变量 

con. ReadIntervalTimeout=10; // 设 置 串口 数据 读 取 的 超时 时 间 

BOOL istrue; // 定 义 布尔 变量 

istrue= SetCommTimeouts (hModem，&con) ; // 调 用 函数 进行 参数 设置 

if (istrue) // 判 断 串口 参数 是 否 设置 成 功 

{ 

MessageBox ("超时 时 间 设 置 成 功 ! "); // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 
1 

else 


{ 
MessageBox ("超时 时 间 设 置 失败 ! 请 重 试 ") ; // 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 


SetupComm (hModem, 1024, 512); // 设 置 各 数据 缓冲 区 的 大 小 

BOOL istrue; // 定 义 布尔 变量 
istrue=PurgeComm (hModem, PURGE TXABORT|PURGE RXABORT|PURGE TXCLEAR| 
PURGE RXCLEAR); // 调 用 函数 对 缓冲 区 内 容 进 行 清除 
if (istrue) / /判断 清除 是 否 成 功 


{ 
MessageBox ("缓冲 区 数据 清除 成 功 ! ") ; // 若 参数 设置 成 功 ， 则 提示 用 户 成 功 
} 


else 


I 
MessageBox ("缓冲 区 数据 清除 失败 ! 请 重 试 ") ; 
// 若 参数 设置 失败 ， 则 提示 用 户 重 试 
} 


BOOL istrue; // 定 义 布尔 变量 
istrue=SetCommMask (hModem, EV _ RXCHAR | EV_ TXEMPTY); 

// 设 置 串口 事件 的 类 型 
if(istrue) // 判 断 串 口 事件 是 否 成 功 


{ 
MessageBox ("串口 事件 设置 成 功 ! "); // 若 事件 设置 成 功 ， 则 提示 用 户 成 功 
} 
else 


{ 
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MessageBox (" 串 口 事件 设置 失败 ! 请 重 试 ") ; 
// 若 事件 设置 失败 ， 则 提示 用 户 重 试 
} 


BOOL istruel; // 定 义 布尔 变量 
DWORD de=0; // 定 义 事件 保存 变量 


} 


从 上 面 的 代码 中 可 以 看 到 ， 在 打开 串口 按钮 的 消息 响应 函数 中 ， 调 用 函数 打开 了 串口 
并 对 该 串口 进行 初始 化 。 


2. 接收 串口 数据 


实例 程序 的 数据 接收 功能 是 在 界面 中 接收 数据 按钮 的 消息 响应 函数 OnRecvdata0 中 实 
现 的 。 其 代码 如 下 : 


void CMyView: :OnRecvdata() 


{ 
istruel= WaitCommEvent (hModem, &de, NULL); 


// 等 待 事件 的 发 生 必须 将 第 三 个 参数 设置 为 NULL 


if(istruel) // 判 断 事件 等 待 是 否 成 功 
{ 
MessageBox (" 串 口 事件 等 待 成 功 ! ") ; // 若 事件 等 待 成 功 ， 则 提示 用 户 成 功 
DWORD de=0; // 定 义 事件 保存 变量 
if (istrue) // 判 断 事件 等 待 是 否 成 功 
{ 
if ((dwEvtMask== EV_RXCHAR) // 判 断 发 生 的 串口 事件 是 否 为 接收 事件 
// 如 果 是 ， 则 表示 缓冲 区 中 有 数据 到 达 
DWORD doe; // 定 义 清除 的 错误 变量 
COMSTAT coms; // 定 义 结构 体 变 量 
ClearCommError (hModem, &doe, gcoms); 
// 清 除 串 口 事 件 并 获取 当前 状态 
if(coms. cbInQue>0) // 判 断 串口 输入 缓冲 区 中 的 数据 大 小 
{ 
char buffer [coms. cbInQue]={0}; // 定 义 并 初始 化 缓冲 区 
DWORD data; // 存 放 实际 读 取 到 的 字 节 数 
BOOL f£; // 定 义 布尔 变量 
f=ReadFile (hModem, gbuffer, coms. cbInQue, data,NULL); 
// 读 取 缓 冲 区 中 的 数据 
EE // 判 断 读 取 函数 的 返回 值 
{ 
BOOL m; // 定 义 布尔 变量 
m=GetOverlappedResult (hModem, NULL, data,true); 
// 判 断 缓 冲 区 中 是 否 存在 数据 
while(!m) // 如 果 存 在 ， 则 进入 循环 


i 
if (GetLastError() == ERROR IO PENDING) ， // 判 断 错 误 代 码 
{ 
m=GetOverlappedResult (hModem, NULL, data,true); 
// 继 续 调用 函数 监视 缓冲 区 数据 
} 


. 
} 
es 
CString strrSstrls // 定 义 字 符 串 
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GetDlgItem(IDC MSG) ->GetWindowText (str) ; // 获 取消 息 接收 框 中 原 有 的 数据 
stri="\r\n”s // 添 加 换行 符 

str+=strl1; / /连接 数据 

stri="\r\n"s 

GetDlgItem(IDC MSG) ->SetWindowText (str); // 将 数据 显示 在 消息 接收 框 中 

} 


当 函 数 WaitCommEvent() 监 视 到 有 相应 的 串口 事件 发 生 时 ,该 函数 将 返回 true。 接 着 ， 
用 户 便 可 以 进行 串口 数据 相关 的 读 取 操 作 了 ， 如 图 13.24 所 示 。 


图 13.24 通过 串口 接收 数据 


3， 发 送 串 口 数 据 


用 户 可 以 在 发 送 数据 按钮 的 消息 响应 函数 OnSenddata0 中 , 实现 串口 数据 的 发 送 操作 。 
代码 如 下 : 


void CMyView: :OnSenddata() // 发 送 数据 按钮 消息 响应 函数 
{ 
CString SEE SEEL7 // 定 义 字 符 串 变量 
char* a; // 定 义 字 符 指针 


DWORD datal; 
GetDlgItem(IDC EDIT2) ->GetWindowText (str); // 获 取 发 送 编辑 框 中 的 内 容 


if(str.GetLength () !=0) // 判 断 用 户 输入 是 否 为 空 
{ 
BOOL f=WriteFile (hModem, str.GetBuffer (0),data, datal,，NULL) ; // 写 入 缓冲 
区 中 的 数据 
EE // 判 断 数 据 写 入 是 否 成 功 
{ 
MessageBox ("数据 写 入 成 功 !"); // 若 数据 写 入 成 功 ， 则 提示 用 户 成 功 
} 
else 
MessageBox ("数据 写 入 失败 !1") ; // 若 数据 写 入 失败 ， 则 提示 用 户 失败 


} 
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} 
} 


在 发 送 数据 按钮 的 消息 响应 函数 中 ， 用 户 首先 获取 发 送 编辑 框 中 的 内 容 。 然 后 ， 判 断 
用 户 输入 的 内 容 是 否 为 NULL。 如 果 不 为 NULL， 则 调用 函数 WriteFile0 将 该 数据 写 入 串 
口 。 和 否则 ， 向 用 户 提示 数据 写 入 失败 。 


4. 保存 串口 数据 


在 本 章 实 例 中 ， 为 了 方便 用 户 查 看 一 些 串 口 数 据 操作 的 相关 记录 。 所 以 ， 用 户 需 要 将 
所 操作 过 的 串口 数据 写 入 文件 中 进行 保存 。 实 现 数据 保存 是 在 界面 中 保存 数据 按钮 的 消息 
响应 函数 OnSavedata0 中 进行 的 。 代 码 如 下 : 


void CMyView: :OnSavedata() 

{ 

CFile file ("数据 记录 .txt",CFile::modeRead|CFile::modeWrite|CFile:: 
modeCreate 


ICFile: :modeNoTruncate|lCFile: :typeBinary); 


// 创 建文 件 

Cotring strs // 定 义 字符 串 变 量 
char szdata[100]; // 数 据 缓冲 区 
DWORD leth=file.GetLength(); // 获 取 数 据 写 入 前 的 文件 长 度 
GetDlgItem(IDC MSG)->GetWindowText (str); // 获 取消 息 接收 框 中 原 有 的 数据 
strcpy (szdata, str.GetBuffer (100)); // 复 制 数 据 缓 冲 区 中 的 数据 
file.SeekToEnd(); // 定 位 文件 指针 到 最 后 
file.Write("\r\n",2); // 写 入 换行 符 
file.Write (szdata, str.GetLength ()); // 写 入 数据 
file.Flush(); // 强 制 写 入 
if(file.GetLength () !=leth) // 判 断 是 否 写 入 新 数据 

MessageBox (" 数 据 保 存 成 功 ! ") // 提 示 用 户 数据 是 否 写 入 成 功 


} 
else 
MessageBox ("数据 保存 失败 !") ; 
} 
file.Close(); 


在 程序 中 ， 用 户 首先 获取 数据 保存 文件 的 原始 长 度 。 然 后 ， 再 将 数据 写 入 文件 中 保存 
并 获取 当前 的 文件 长 度 。 最 后 判断 原始 长 度 与 当前 长 度 的 值 。 若 该 值 不 同 ， 则 认为 写 入 数 
据 成 功 。 和 否则 ， 认 为 写 入 数据 失败 ， 如 图 13.25 所 示 。 


5. 关闭 串口 


用 户 在 使 用 完 串口 或 者 应 用 程序 退出 时 ， 都 需要 将 打开 的 串口 关闭 。 和 否则 ， 该 串口 将 
一 直 处 于 打开 状态 ， 使 其 他 程序 或 者 该 应 用 程序 不 能 继续 使 用 该 串口 。 本 实例 中 ， 将 该 功 
能 实现 在 程序 关闭 消息 WM_CLOSE 的 消息 响应 函数 中 。 代 码 如 下 : 


void CMyView: :OnClose () // 关 闭 消 息 wM CLOSE 的 消息 响应 函数 
| 
BOOL is; // 定 义 布尔 变量 
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is=::CloseHandle (hModem) // 调 用 函数 关闭 串口 句柄 
if(is) // 判 断 串口 是 否 关 闭 成 功 
{ 

MessageBox (" 串 口 成 功 关 闭 ") // 提 示 信息 


} 


else 


{ 
MessageBox ("串口 关闭 失败 ") ; 


} 
CFormView: :OnClose (); 


} 


13.25 数据 保存 成 功 的 提示 信息 
本 节 通 过 应 用 API 串口 函数 进行 实例 编程 ,向 用 户 讲解 各 个 串口 编程 相关 的 API 函数 
的 用 法 等 。 请 用 户 参考 随 书 光盘 中 相应 章节 的 实例 代码 进行 学 习 。 
13.3 小 结 


本 章 通过 实例 程序 各 个 功能 的 实现 步骤 ， 向 用 户 讲解 关于 串口 编程 的 相关 知识 。 在 实 
例 程 序 中 ， 分 别 通过 使 用 MFC 串口 控件 和 串口 API 函数 向 用 户 介 绍 了 这 两 种 方法 的 使 用 
步骤 等 。 用 户 通过 本 章 的 学 习 可 以 学 习 到 串口 编程 的 一 般 流程 以 及 相关 函数 和 控件 的 使 用 
方法 等 。 用 户 学 习 完 本 章 之 后 ， 应 当 能 够 独立 进行 串口 实例 程序 的 编写 、 调 试 等 。 
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目前 ， 由 于 在 这 个 信息 化 的 社会 环境 下 ， 商 业 竞 争 变 得 越 来 越 激烈 。 所 以 ， 越 来 越 多 
的 企业 都 在 开发 自己 的 短信 平台 ， 以 求 达到 更 快捷 的 信息 资源 或 服务 。 一 般 情 况 下 ， 用 户 
都 会 选择 使 用 VC 平台 与 短信 猫 进行 短信 平台 的 开发 。 因 此 ， 在 本 章 中 ， 将 向 用 户 介绍 短 
信 猫 相关 的 基本 知识 及 其 二 次 开发 接口 等 相关 内 容 。 


14.1 短信 猫 介 绍 


用 户 在 VC 平台 下 开发 短信 平台 时 ， 短 信 猫 是 必 不 可 少 的 硬件 设施 。 所 以 ， 用 户 必 须 
了 解 什么 是 短信 猫 及 其 种 类 。 当 然 在 开发 时 ， 作 为 程序 员 而 言 ， 最 关心 的 问题 还 是 短信 猫 
的 生产 商 所 提供 的 二 次 开发 接口 。 因 此 ， 在 本 节 中 ， 将 向 用 户 介绍 短信 猫 的 种 类 以 及 二 次 
开发 接口 等 相关 知识 。 


14.1.1 短信 猫 简介 


短信 猫 GSM MODEM) 是 一 种 支持 GSM 无 线 通信 的 工业 级 调制 解 调 器 ， 其 功能 与 
用 户 日 常 所 用 的 MODEM (交换 机 ) 的 功能 基本 一 致 。 一 般 情 况 下 ， 短 信 猫 的 核心 部 分 是 
基于 德国 西门 子 的 GSM 模块 的 。 用 户 只 需 插 入 国内 移动 通信 运营 商 的 SIM 卡 后 ， 即 可 接 
入 运营 商 的 GSM 网 络 中 。 这 样 , 用 户 便 可 以 通过 短信 猫 ， 实 现 无 线 GSM 通话 、 收 发 短信 、 
数据 等 功能 。 

如 果 将 短信 猫 与 手机 相 比较 ， 短 信 猪 的 核心 模块 与 手机 的 核心 模块 一 样 。 当 短信 猪 接 
通电 源 以 后 ,其 内 置 软件 便 开始 运行 工作 。 如 果 用 户 将 某 个 移动 运营 商 的 SIM 卡 插入 到 短 
信 猫 中 。 那 么 ， 短 信 猫 便 完 全 和 手机 一 样 ， 被 接 入 到 移动 通信 网 络 中 进行 工作 。 

同时 , 计算 机 可 以 通过 串口 或 USB 接口 通过 相应 的 连接 线 连 接 短信 猫 , 通过 一 系列 的 
AT 指令 ， 实 现 与 短信 猫 的 数据 通信 。 例 如 ， 收 发 短信 、 拨 打 电 话 以 及 收发 传真 等 。 只 是 
在 本 章 实 例 中 ， 仅 需要 使 用 其 手 发 短信 的 功能 即 可 。 所 以 ， 用 户 可 以 不 用 其 他 的 功能 。 

短信 猫 与 手机 最 大 的 区 别 ， 在 于 手机 有 自 带 的 屏幕 、 键 盘 和 应 用 软件 。 而 短信 猫 则 需 
要 用 户 根据 其 二 次 开发 接口 对 其 进行 相关 的 驱动 和 控制 。 当 前 ， 用 户 在 实际 开发 中 所 使 用 
的 短信 猫 ， 其 外 型 结构 有 很 多 种 ， 但 是 其 核心 技术 都 是 一 样 的 ， 如 图 14.1 所 示 。 


名 注意 : 图 14.1 中 所 示 外 型 结构 的 短信 猫 是 基于 USB 接口 的 一 款 短信 猫 。 关 于 短信 猫 接 
口 方面 的 知识 将 在 14.1.2 节 中 介绍 。 
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14.1.2 ”短信 猫 分 类 


虽然 短信 猫 的 核心 技术 基本 相同 ， 但 是 根据 计算 机 的 接口 和 短信 猫 中 接口 模块 的 不 
同 ， 短 信 猫 也 可 以 分 为 不 同 的 种 类 。 如 果 按 照 计 算 机 的 接口 不 同 ， 短 信 猫 可 以 分 为 串口 短 
信 猫 、USB 接口 短信 猫 等 。 如 果 按 照 短信 猎 中 接口 模块 多 少 ， 短 信 猫 可 分 为 单口 短信 猫 和 
短信 猫 池 两 种 。 因 此 ， 在 本 节 中 将 向 用 户 简 单 介绍 这 几 种 短信 猫 。 


1. 串口 短信 猫 


串口 短信 猫 是 指 该 类 短信 猫 与 计算 机 之 间 的 数据 通信 是 通过 串口 进行 传输 的 。 其 接口 
外 型 如 图 14.2 所 示 。 


图 14.1 常用 短信 猫 外 型 结构 图 14.2 串口 短信 猫 外 型 结构 


当 用 户 使 用 串口 短信 猫 与 计算 机 相 结 合 ， 开 发 短 消息 平台 时 ， 开 发 人 员 可 以 通过 计算 
机 串口 向 短信 猫 发 送 AT 指令 完成 数据 通信 等 操作 。 


2. USB 接 口 短信 猫 


USB 接口 短信 猫 是 指 该 类 短信 猫 与 计算 机 之 问 的 数据 通信 是 通过 USB 接口 进行 传输 
的 。 其 接口 外 型 如 图 14.1 所 示 。 

由 于 USB 接口 属于 即 插 即 用 的 计算 机 接口 。 所 以 ， 使 用 USB 接口 的 短信 猫 时 ， 其 操 
作 步 又 非常 简单 。 用户 仅 需 要 将 短信 猫 插入 计算 机 的 USB 接口 即 可 实现 数据 通信 , 并 且 可 
以 从 计算 机 串口 中 取 其 相应 的 工作 电压 进行 工作 。 所 以 ， 从 价格 上 讲 ，USB 短信 猫 的 市 场 
价格 也 比较 便宜 。 在 这 里 ,建议 用 户 在 实际 开发 时 ， 应 该 使 用 USB 接口 的 短信 猫 进行 实例 
开发 。 


3. 单口 短信 猫 

单口 短信 猫 是 指 在 短信 猎 中 ， 用 户 只 能 插入 一 张 SIM 卡 ， 进 行 单个 通道 的 数据 通信 ， 
如 图 14.3 所 示 。 如 果 用 户 希 望 通过 不 同 的 通道 发 送 和 接收 多 个 数据 ， 那么 应 该 采用 多 口 的 
短信 猫 进 行 开发 。 
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4. 短信 猫 池 


短信 猫 池 是 指 该 类 短信 猫 具 有 多 个 通道 ， 可 以 插入 多 张 SIM 卡 ， 并 且 能 够 同时 发 送 和 
接收 多 个 数据 ， 如 图 14.4 所 示 。 


Te 


图 14.3 单口 短信 猫 外 型 结构 图 14.4 短信 猫 池 外 型 结构 


如 图 14.4 所 示 ， 短 信 猫 池 具有 多 个 数据 传输 通道 ， 可 以 插入 多 张 SIM 卡 ， 并 且 每 个 
通道 都 具有 各 自 的 数据 传输 天 线 。 如 果 用 户 开发 的 短 消 息 平台 需要 以 不 同 的 号 码 群 发 短 消 
息 ， 那 么 应 该 使 用 该 类 型 的 短信 猫 进行 平台 开发 。 

在 本 节 中 , 主要 向 用 户 介绍 了 短信 猫 的 几 种 类 型 以 及 外 型 结构 。 通过 本 节 知 识 的 学 习 ， 
用 户 对 短信 猫 的 种 类 以 及 类 型 应 该 有 一 个 系统 的 了 解 。 


14.1.3 ”短信 猫 开 发 接口 


短信 猫 开 发 接口 (GSM MODEM SDK) 是 指 程序 员 编程 与 短信 猫 进行 数据 通信 时 ， 短 
信 猫 的 生产 商 为 程序 员 提 供 的 一 系列 函数 或 者 控件 等 。 一 般 情况 下 ， 短 信 猫 的 生产 商 为 程 
序 员 提供 了 4 种 开发 接口 模式 。 这 4 种 开发 接口 模式 分 别 为 使 用 AT 指令 、 短 信 猫 二 次 开 
发 包 、 短 信 猫 通信 中 间 件 以 及 第 三 方 提供 的 短信 网 关 。 在 本 节 中 ， 将 向 用 户 分 别 介绍 这 4 
种 开发 接口 模式 。 

1. 使 用 AT 指令 

AT 指令 是 指 一 种 基于 调制 解 调 器 的 命令 语言 。 一 般 情况 下 ， 该 指令 是 从 一 个 终端 设 
备 或 者 是 数据 终端 设备 向 终端 适配器 、 数 据 电 路 终端 设备 发 送 的 指令 。 通 过 向 终端 设备 发 
送 AT 指令 可 以 实现 控制 其 功能 的 作用 。 例 如 ， 当 用 户 需要 获取 插入 短信 猫 中 的 SIM 的 相 
关 信 息 时 ， 便 可 以 使 用 AT 指令 实现 。 其 指令 代码 如 下 : 

AT+CCID // 获 取 短 信 猫 中 的 SIM 卡 相关 信息 

在 AT 指令 中 , 均 以 字符 AT 作为 指令 开始 。 上 面 中 的 指令 AT+CCID 表示 用 户 将 使 用 
该 指令 获取 短信 猫 中 插入 的 SIM 卡 的 标识 , 而 这 个 命令 将 使 短信 猫 中 相应 的 模块 读 取 SIM 
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卡 上 的 EF-CCID 标识 文件 。 


各 注意 : 在 这 里 仅仅 是 为 了 向 用 户 介绍 AT 指令 的 作用 以 及 基本 格式 。 关 于 该 指令 的 详细 
讲解 将 在 14.3 节 中 向 用 户 进行 讲解 。 


2. 短信 猫 二 次 开发 包 


短信 猫 二 次 开发 包 是 指 短信 猫 的 生产 商 通过 对 AT 指令 进行 底层 封装 后 ， 提 供给 上 层 
开发 人 员 的 API 函数 或 者 控件 等 。 

当 用 户 需 要 使 用 短信 猫 中 相应 的 功能 时 ， 只 需要 调用 生产 商 所 提供 的 短信 猫 二 次 开发 
包 中 的 相关 API 函数 等 即 可 。 虽 然 短 信 猫 的 生产 商 封 装 了 底层 的 AT 指令 ， 但 是 用 户 只 要 
对 AT 指令 非常 了 解 ， 也 可 以 实现 自行 封装 AT 指令 而 构造 短信 猫 的 二 次 开发 包 。 例 如 ， 
用 户 将 获取 短信 猫 中 插入 的 SIM 卡 的 相关 信息 的 AT 指令 封装 为 一 个 函数 。 代 码 如 下 : 


void GetSIM() // 封 装 的 AT 指令 函数 
a // 省 略 部 分 代码 
char data[]={"AT+CCID"}; // 定 义 AT 指令 字符 数组 
DWORD datal; // 定 义 变量 保存 实际 写 入 的 指令 大 小 
BOOL istrue; // 确 定 指令 发 送 是 否 成 功 
istrue=: :WriteFile(handle, &data, sizeof (data) ,datal, NULL); 
// 将 AT 指令 字符 通过 串口 进行 发 送 
if(istrue) // 判 断 AT 指令 是 否 发 送 成 功 


MessageBox ("获取 SIM 卡 信息 成 功 ! "); // 提 示 用 户 发 送 结果 


MessageBox ("获取 SIM 卡 信息 失败 ! "); 

} 

} 

在 上 面 的 代码 中 ， 用 户 可 以 看 到 像 短 信 猫 发 送 AT 命令 是 通过 串口 进行 传输 的 ， 函 数 
WriteFile0) 的 第 一 个 参数 handle 表示 串口 的 句柄 。 但 是 , 该 种 发 送 AT 指令 的 方法 仅 适合 于 
串口 型 的 短信 猫 。 

如 果 用 户 使 用 的 短信 猫 为 USB 接口 类 型 , 则 需要 RS-232 串口 转 USB 接口 的 转换 器 也 
可 实现 通过 串口 发 送 AT 指令 。 

3. 短信 猫 通信 中 间 件 


短信 猫 通信 中 间 件 是 指 一 套 专 门 的 针对 数据 库 接口 的 短信 猫 通信 软件 。 用 户 使 用 该 类 
型 的 通信 中 间 件 ， 仅 需 提交 短信 队列 到 数据 库 即 可 进行 短信 收发 。 因 此 ， 无 论 用 户 所 使 用 
的 是 哪 一 种 开发 语言 进行 短信 猫 的 二 次 开发 ， 只 需要 对 其 数据 库 进 行 读 写 即 可 。 这 种 开发 
简单 快速 ， 节 约 开发 成 本 ， 是 目前 最 为 快捷 的 一 种 短信 应 用 开发 模式 。 

4. 使 用 短信 网关 

短信 网关 是 指 由 第 三 方 开发 的 应 用 程序 或 提供 的 程序 开发 接口 。 一 般 情况 下 ， 这 类 短 
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信 网 关 都 是 基于 网 页 提供 给 用 户 使 用 的 。 通 常 ， 第 三 方 首先 将 短信 操作 平台 的 相关 功能 集 
成 到 网 页 中 。 然 后 ， 用 户 便 可 以 使 用 其 提供 的 网 页 地 址 ， 将 相关 的 数据 转换 为 变量 通过 该 


网 址 进行 传递 ， 则 最 终 构造 的 网 址 如 下 : 


网 页 地 址 传送 到 网 页 中 的 相关 参数 中 。 例 如 ， 用 户 假设 一 个 第 三 方 所 提供 的 网 页 地 址 为 
“http://www.smsgate.cn/basic.asp”， 而 用 户 将 发 送 的 短信 相关 数据 等 以 参数 的 形式 通过 该 


http://www.smsgate.cn/basic.asp?mob=13778745236&pwd=mypassword&tel= 


08256662151;13558979637&msg= 短 信 内 容 


用 户 在 实际 编程 时 ， 只 需要 按照 参数 的 一 定 顺 序 构造 好 该 网 址 以 后 ， 便 可 以 将 直 


实现 短 消息 的 发 送 。 在 构造 的 网 址 中 ， 其 参数 及 意义 如 下 : 
口 参数 mob 表示 用 户 在 第 三 方 处 注册 的 电话 号 码 。 该 电话 号 码 是 用 户 为 了 使 
方 所 提供 的 短信 网 关 而 注册 的 ， 相 当 于 用 户 名 。 
口 参数 pwd 表示 用 户 注册 时 ， 所 填写 的 密码 。 


之 间 使 用 符合 “;” 隔 开 即 可 
口 参数 msg 表示 短 消息 的 相关 内 容 。 


其 打开 
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口 参数 tel 表示 接 收 短 消息 的 电话 号 码 。 如 果 接 收 方 为 多 个 电话 号 码 ， 则 将 各 个 号 码 


各 注意 : 当 用 户 构造 该 网 址 时 ， 必 须 将 各 个 参数 及 其 参数 值 之 间 使 用 符合 “&” 进 行 连接 。 
例如 , 用 户 使 用 VB 程序 将 短 消息 中 的 相关 内 容 构造 为 第 三 方 所 提供 的 短信 平台 网 址 。 


代码 如 下 : 
Function geturl (ByVal strParameter As String) Rs String 
Dim s As String // 定 义 字符 串 变量 s 
Dim i As Integer // 定 义 int 型 变量 
Dim intValue As Integer // 定 义 int 型 变量 
Dim TmpData() Rs Byte // 定 义 字 节 变量 
s="" // 初 始 化 字符 串 
TmpData=StrConv (strParameter，vbFromUnicode) // 调 用 系统 函数 
For i=0 To UBound (TmpData) //For 循环 
intValue=TmpData (i) // 赋 值 


If (intValue >= 48 And intValue <= 57) Or (intValue >= 65 And intValue <= 


90) Or (intValue >= 97 


// 判 断 数据 的 范围 以 及 识别 
And intValue <= 122) Then 
s=s & Chr (intValue) // 连 接 字符 串 
ElseIf intValue=32 Then // 判 断 字符 
S=S & "+" // 连 接 符 号 "+" 
Else 
s=s & "%" & Hex(intValue) // 将 值 转换 为 十 六 进 制 并 连接 
End If 
Next i 
geturl=s // 返 回 构造 好 的 网 址 
End Function // 结 束 函数 


如 果 用 户 使 用 第 三 方 所 提供 的 短信 和 网关。 那么 ， 用 户 在 开发 短信 平台 时 ， 不 需要 再 使 
用 短信 猫 等 相关 的 硬件 设备 了 。 而 仅仅 需要 将 短 消息 的 相关 内 容 进行 组 织 以 后 ， 构 造成 第 
三 方 所 规定 的 网 址 后 ， 将 其 打开 即 可 。 这 种 方法 使 用 简单 ， 易 于 实现 。 但 是 ， 其 局 限 性 非 
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常 大 ， 用 户 会 受到 第 三 方 的 一 些 约束 等 。 

在 本 节 中 ， 主 要 向 用 户 介绍 了 关于 短信 猫 二 次 开发 接口 相关 的 几 种 方法 。 并 且 介绍 了 
这 几 种 方法 的 优点 以 及 缺点 等 。 通 过 本 节 的 学 习 ， 用 户 将 了 解 对 短信 猫 二 次 开发 接口 方面 
的 知识 。 


14.2 ”实现 与 短信 猫 的 硬件 连接 


用 户 使 用 短信 猫 时 ， 应 该 首先 确保 PC 与 短信 猫 之 间 的 硬件 连接 无 误 后 ， 方 可 进行 相 
关 的 操作 。 所 以 ， 在 本 节 中 ， 将 向 用 户 介绍 短信 猫 相 关 的 硬件 设备 以 及 实现 PC 与 短信 猫 
的 硬件 连接 方法 。 


14.2.1 短信 猫 的 硬件 设备 


一 般 情 况 下 ， 短 信 猫 的 硬件 设备 较为 简单 ， 主 要 由 几 部 分 组 成 。 在 本 节 中 ， 将 向 用 户 
介绍 这 些 硬 件 设备 的 外 型 结构 以 及 作用 等 。 


1. 短信 猫 主 机 


首先 ， 用 户 应 该 获得 短信 猫 的 主机 ， 这 是 硬件 中 最 重要 的 一 部 分 。 由 于 短信 猫 有 两 种 
接口 模式 。 所以， 用户 可 以 根据 需要 选择 合适 的 短信 猫 主 机 。 例 如 ， 用 户 选 择 USB 接口 的 
短信 猫 作为 短信 猫 主 机 ， 如 图 14.5 所 示 。 

在 图 14.5 中 , 所 示 的 短信 猫 是 USB 接口 模式 的 。 如 
果 用 户 需要 使 用 串口 模式 的 短信 猫 ， 则 其 外 型 结构 如 图 
14.2 所 示 。 一 般 情况 下 ， 用户 选择 USB 接口 的 短信 猫 可 
以 节约 成 本 ,缩短 开发 周期 等 。 


2. 电源 线 与 数据 传输 线 


在 短信 猫 与 计算 机 之 间 需 要 一 根 数据 线 连接 ， 才 能 
实现 数据 通信 。 例 如 ， 用 户 使 用 的 短信 猫 是 USB 接口 ， 则 数据 线 应 该 选择 一 根 USB 接口 
线 。 如 果 用 户 使 用 的 短信 猫 是 串口 接口 ， 则 数据 线 选择 一 根 串口 线 即 可 。 

通常 ，USB 接口 的 短信 猫 可 以 从 计算 机 上 获得 电源 进行 工作 。 所 以 ， 用 户 使 用 USB 
接口 的 短信 猫 时 ， 是 不 需要 另外 使 用 单独 的 电源 线 为 其 供电 的 。 但 是 ， 串 口 模式 的 短信 猫 
就 需要 用 户 单独 配 上 相应 的 电源 才能 工作 。 

3. 天 线 

由 于 短信 猫 工作 时 ， 是 无 线 传输 数据 信号 的 。 所以， 用户 使 用 短信 猫 时 ， 还 需要 为 其 
配置 相应 的 天 线 ， 如 图 14.6 所 示 。 
各 注意 : 短信 猫 的 天 线 可 以 用 来 接收 或 者 发 送 用 户 需要 的 数据 等 。 当 然 , 图 14.6 中 所 示 的 

天 线 为 一 般 插 接 式 天 线 。 该 天 线 最 大 的 缺点 是 安装 过 程 较 繁杂 。 


14.5 USB 接口 短信 猫 
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图 14.6 短信 猫 天 线 


实际 上 ， 短 信 猫 的 天 线 还 有 一 种 吸盘 式 的 天 线 。 安 装 这 种 天 线 比 较 方便 并 且 快 速 。 当 
户 使 用 时 ， 将 其 吸盘 放置 在 短信 猫 上 即 可 。 其 大 致 外 型 结构 如 图 14.7 所 示 。 


图 14.7 短信 猫 吸盘 天 线 外 型 结构 
上 面 所 讲 的 硬件 设备 基本 上 就 是 短信 猫 的 所 有 设备 了 。 但 是 ， 用 户 进行 二 次 开发 还 需 
要 短信 猫 生产 商 所 提供 的 短信 猫 二 次 开发 包 。 这 个 二 次 开发 包 对 于 用 户 而 言 是 非常 重要 的 。 
在 本 节 中 ， 主 要 向 用 户 介绍 了 短信 猫 的 硬件 设备 及 其 外 型 结构 和 基本 作用 等 。 


14.2.2 ”实现 PC 与 短信 猫 连 接 


现在 ， 用 户 已 经 可 以 使 用 短信 猫 相关 的 硬件 与 计算 机 相连 接 ， 实 现 数据 交换 了 。 这 个 
功能 需要 经 历 两 个 步骤 才能 完成 。 这 两 个 步骤 分 别 为 短信 猫 本 身 的 硬件 连接 以 及 计算 机 配 
置 。 在 本 节 中 ， 将 向 用 户 分 别 介绍 这 两 个 步骤 的 实现 方法 。 

1. 短信 猫 硬件 连接 


首先 ， 用 户 需 要 将 短信 猫 的 电源 断 掉 ， 并 弹出 SIM 卡 座 ， 将 SIM 卡 放 入 该 卡 座 中 。 
用 户 在 插入 过 程 中 ， 应 将 SIM 卡 的 金属 面 朝 上 ， 并 且 应 该 十 分 小 心 ， 以 免 弄 坏 SIM 卡 。 
如 果 SIM 卡 成 功放 入 卡 座 中 ， 用 户 应 该 将 卡 座 轻 轻 收回 。 

然后 ， 用 户 需 要 将 短信 猫 天 线 安装 到 短信 猫 上 ， 如 图 14.8 所 示 。 短 信 猫 天 线 安装 成 功 
后 , 用 户 便 可 以 使 用 串口 线 或 者 USB 连接 线 将 短信 猫 和 计算 机 相应 的 接口 连接 起 来 , 如 图 
14.9 所 示 。 

连接 成 功 后 ， 用 户 需要 为 短信 猫 插 上 电源 ， 使 其 进入 工作 状态 。 如 果 用 户 使 用 的 短信 
猫 是 基于 USB 接口 ， 那 么 该 短信 猫 会 直接 从 计算 机 中 取 电 运行 。 

用 户 需要 等 待 短 信 猫 运行 2 到 3 分 钟 后 ， 查 看 其 工作 指示 灯 是 否 点 亮 。 如 果 该 指示 灯 
没有 被 点 亮 ， 则 短信 猫 硬 件 连接 出 现 问 题 ， 需 要 重新 进行 检查 。 否 则 ， 表 示 连 接 正确 ， 短 
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信 猫 已 经 进入 工作 状态 。 
2. 计算 机 配置 


用 户 待 短信 猫 的 硬件 安装 成 功 后 ， 还 需要 对 计算 机 进行 相应 的 配置 才 可 以 实现 计算 机 
与 短信 猫 进 行 数 据 通信 。 用 户 在 计算 机 中 ， 需 要 添加 的 服务 分 别 为 添加 调制 解 调 器 以 及 添 
加 相应 的 网 络 连 接 。 首 先 ， 用 户 为 计算 机 添加 调制 解 调 器 是 为 了 校准 对 应 的 串口 。 其 步骤 
如 下 : 


图 14.8 ”短信 猫 安装 天 线 后 的 外 型 图 14.9 使 用 连接 线 连接 短信 猫 和 计算 机 
(1) 用 户 选 择 “ 开 始 ”|“ 控 制 面板 ”命令 ， 打 开 控 制 面板 ， 如 图 14.10 所 示 。 


文件 到 ) 编辑 于) 查看 收 送 入) 工具 I) 帮助 如 
tt 合 - 侍 记 搜索 已 文 H 夹 国 - 
地 址 中 | 口 控 制 面板 


i 和 fi 吗 和 


Natodesk 打 | Autodesk 打 Cle ype 
区 克扣 到 分 类 访 图 | 印 机 管理 器 | 印 样式 管 Tuni 
请 到 种 恒 
> 3VIDIA 控制 Resltek 高 清 。 Window 
WD Mindons Update E 演 Cartspace 


他 于 助 和 支持 本 
2 


人 i 


本 ”多 
管理 工具 衬 盘 


电话 
解 昱 器 先 ; 


D3 
任务 栏 和 [日 期 和 时 间 。 扫描 仪 和 昭 
开始 | 荣 单 相机 


图 14.10 控制 面板 
(2) 用 户 单 击 控制 面板 中 相应 的 文件 列表 项 “电话 和 调制 解 调 器 选项 ”并 打开 该 选项 
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对 话 框 ， 如 图 14.11 所 示 。 


外 注意 : 如 果 用 户 的 计算 机 中 已 经 连接 了 调制 解 调 器 ， 那 么 在 图 14.11 所 示 的 对 话 框 中 ， 
会 显示 相应 的 调制 解 调 器 名 称 以 及 串口 号 。 


(3) 单 击 “ 添 加 ”按钮 ， 打 开 “ 添 力 


硬件 向 导 ” 对 话 框 ， 如 图 14.12 所 示 。 
电话 和 调制 解 调 到 选项 
搞 导 规则 | 油 科 解 油 世 | 高 克 扩 加 本 人 内 导 
安装 者 调制 角 调 轩 SS 
bp 本 机 安装 了 下 面 的 市 解 尖 委 你 忍让 呈 ador: 为 他 检测 调制 解 大? 
调制 解 调 器 这 各 = 
Tinaows 天 在 格 检测 信 的 调解 调 器 。 在 经 之 前 ， 你 应 : 
车 调解 油 吕 连作 计算 可 ， 请 确定 它 已 打开 。 
退出 正 便 用 调和 蓝调 吕 的 程 。 
一 pm 二 后 ， 请 击 “下 一 步 ”。 
订 征 要 各 出 屏 玖 再 币 肖 油 器 :我 特区 列 表 中 进 皖 而) 
ET Pm 原 | 
[| 50EESG [- 


图 14.11 “电话 和 调制 解 调 器 选项 ”对 话 框 图 14.12 “添加 硬件 向 导 ” 对 话 框 
在 该 向 导 对 话 框 中 ,如 果 用 户 选择 “不 要 检测 我 的 调制 解 调 器 材 : 我 将 从 列表 中 选择 ” 
复 选 框 ， 表 示 向 导 程序 将 不 执行 检测 。 一 般 情 况 下 ， 用 户 均 需 要 选择 该 复 选 框 。 

(4) 单 击 “ 下 一 步 ” 按 钮 ， 开 始 选择 并 安装 调制 解 调 器 ， 如 图 14.13 所 示 。 

(5) 选择 调制 解 调 器 以 后 ， 单 击 “ 下 一 步 ”按钮 ， 选 择 串 口号 ， 如 图 14.14 所 示 。 


安 台新 调 币 角 调 器 DRS 元 靳 浊 抽 名 加 pe 
ty 过 俘 你 相安 闪 调 币 解 调 器 的 哺 口 - AS 
| 本 er is OT—— 
EE 
TR 
[1 到 s 6 WEE 
生 惟 沁 和 和 沼 关于) 可 标 从 [9500 ps 册 侧 解 订 用 E 到 
于 生生 28000 MD 前 1 
CES CR CES ED] 


图 14.13 选择 调制 解 调 器 图 14.14 选择 串口 号 

(6) 单 击 “ 下 一 步 ” 按 钮 完成 串口 的 选择 并 成 功 安装 调制 解 调 器 ， 如 图 14.15 所 示 。 

(7) 用 户 单 击 “ 完 成 ”按钮 便 成 功 为 计算 机 添加 并 安装 了 调制 解 调 器 。 此 时 ， 用 户 便 
可 以 查看 刚 安装 的 调制 解 调 器 的 相关 信息 了 ， 如 图 14.16 所 示 。 

在 本 节 中 ， 向 用 户 介绍 了 如 何 为 计算 机 添加 调制 解 调 器 的 相关 配置 方法 。 通 过 本 节 的 
学 习 ， 用 户 也 可 以 使 用 同样 的 方法 为 计算 机 添加 其 他 硬件 设备 等 。 
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3. 添加 网 络 连接 


用 户 要 实现 计算 机 与 短信 猫 的 通信 ， 还 需要 为 计算 机 添加 相应 的 网 络 连接 ， 才 可 以 成 
功 实现 通 信 。 其 基本 的 操作 步骤 如 下 : 

(1) 用 户 可 以 右 击 桌面 上 的 “网 上 邻居 ”， 在 弹出 的 快捷 菜单 中 选择 “属性 ”命令 ， 
将 弹出 “网 络 连 接 ” 对 话 框 ， 如 图 14.17 所 示 。 


标准 33600 bps 调制 解 调 各 属性 区 区 
添加 硬件 向 导 
该 口 。 coml 
扬声器 音量 G) 
是 大 请 口 速度 加 
(so sm 
搜 号 控制 
了 
图 14.15 完成 调制 解 调 器 的 安装 图 14.16 查看 调制 解 调 器 的 相关 信息 
文件 吧 ) 护 辑 电 ) 查看 Q) 收藏 如 工具 CD) 高 级 如 帮助 如 
9 D 唐 记 扫 雪 已 文 Hf 天 加 -内 国防 沪 X 则 是 关 有 的 
地 址 Dn) | 仿 网 络 连 接 > 上 


LAN 或 高 速 Internet 


外 娃 一 个 新 的 连接 得 
多 刘 于 4 型 力 人 网 E27 
全 要 er 防 k 


图 14.17 “网 络 连 接 ” 对 话 框 
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全 注意 : 用 户 除了 使 用 本 章 中 所 介绍 的 方法 打开 “网 络 连接 ”对 话 框 以 外 ， 还 可 以 使 用 操 


作 系 统 中 的 控制 面板 打开 。 


(23 


向 导 ” 对 话 框 ， 如 图 14.18 所 示 。 
(3) 单 击 


欢迎 使 用 新 建 连接 向 导 


此 问 对 将 帮助 作 
， 连 近 到 Tnternet- 
， 连接 到 专用 同 络 ， 例 加 才 的 办 公司 络 - 


。 设置 一 个 家 放 职 小 型 办 公 网 络 。 


要 继 未 ， 语 单 击 “ 下 一 步 * 。 


加 过 天 


图 14.18 “新 建 连接 向 导 ” 对 话 框 


户 在 “网 络 任务 ” 栏 中 ， 选 择 “ 创 建 一 个 新 的 连接 ”选项 ， 将 弹出 “新 建 连接 


“下 一 步 ”按钮 ， 选 择 网 络 连接 类 型 ， 如 图 14.19 所 示 。 


寺 建 入 接 向 导 
网 络 连 接 关 型 A 
站 于 扫 什 和 7 Co) 


OE Toterset EY 
连接 到 | Interret 这样 低 就 可 以 浏览 Yey 或 阅读 电子 邮 御 。 
口 连 芭 到 我 的 工作 世 所 的 网 政 (0) 
旨 芝 到 商业 9 (使用 摧 呈 或 rm ， 过 样 作 吉 可 以 在 家 时 或 其 它 地 


口 设 下 家 庭 或 小 型 办 公司 络 G) 
连接 到 一 个 现 有 的 家 庭 台 小 型 办 公 网 络 ， 或 者 设置 一 个 新 的 。 
口 设 秆 高 级 和 连接) 
和 口 ， 事 口 求 红外 关口 志 接 连接 到 其 它 计 算 机 ， 或 设置 此 计算 机 使 其 它 


[7 | 


14.19 选择 网 络 连 接 类 型 


外 注意 : 在 这 一 步 中 ， 用 户 需要 选择 连接 的 网 络 类 型 为 “连接 到 Internet”。 
(4) 单 击 “ 下 一 步 ”按钮 ， 选 择 “ 手 动 设置 我 的 连接 ” 单 选 按钮 ， 如 图 14.20 所 示 。 


(5) 单 击 


Ws stem nt at 
你 于 怎样 乏 揪 到 | Trternet? 

品 从 Internet 服务 雁 供 商 (IS?) 列表 选择 [L) 

侣 六 动 设 品 多 的 连 拉 硬 j 
nr 


口 使 用 要 从 TSP 和 型 的 CD C) 


CTE Cw 
图 14.20 选择 网 络 连接 方式 


(6) 单 击 


“下 一 步 ”按钮 ， 选 择 “ 用 拨号 调制 解 调 器 连接 ”选项 ， 如 图 14.21 所 示 。 


Internet 连接 
您 起 怎样 连 振 到 Internet? 


加 
加 十 芒 号 调 币 郁 调 蜗 连 接 CD) 

这 种 类 型 的 连接 使 用 调制 解 凋 器 和 葵 通 电话 示 或 ISD 电话 引 。 
侣 用 要 求 用 户 名 和 密码 的 富 带 连接 来 连接 q) 


a 或 电 并 调制 解 调 器 的 高 速 连 接 。 您 的 ISP 可 能 格 这 种 


〇 用 一 直 在 贱 的 宽带 连接 来 连接 


CD) 
和 LAN 连接 的 高 过 连接 。 它 总 是 活动 


图 14.21 选择 使 用 拨号 调制 解 调 器 连接 


“下 一 步 ” 按 钮 ， 修 改 服务 提供 商 的 名 称 为 GPRS， 如 图 14.22 所 示 。 


(7) 单 击 “ 下 一 步 ” 按 钮 ， 修 改 服务 提供 商 的 电话 号 码 。 由 于 在 这 里 用 户 所 使 用 的 服 
务 提 供 商 是 调制 解 调 器 。 所 以 ， 将 该 电话 号 码 修改 为 “*99***l#”， 如 图 14.23 所 示 。 
(8) 单 击 “ 下 一 步 ” 按 钮 ， 修 改 用 户 的 账户 信息 ， 如 图 14.24 所 示 。 
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ss sssnettar 2) 
在 下 面 答 大 电话 号 码 , 在 下 面 辆 入 电话 号码。 
电话 号 码 位 ) 电 知 号 码 下 ) 
ee 3 
和 a Pe 
Co mj| | CE Cm 
图 14.22 修改 服务 提供 商 的 名 称 图 14.23 “修改 服务 提供 商 的 电话 号 码 


外 注意 : 用 户 在 这 一 步 修 改 账户 信息 时 ， 可 以 将 这 些 信息 保留 为 空 ， 表示 默认 .。 


(9) 单 击 “ 下 一 步 ”按钮 ， 进 入 创建 网 络 连 接 的 最 后 一 步 ， 选 择 是 否 在 桌面 上 添加 一 
个 快捷 方式 ， 如 图 14.25 所 示 。 


Tateraet 帐户 信息 A 正在 完成 新 建 连接 向 导 
姬 格 需要 帐户 各 和 密码 来 嫩 录 到 | 络 的 Interaet 帐户 , ) 
你 已 成 功放 成 外 建 下 列 连接 需要 的 上 
TT 有， tt 这 JE 人 广 。(i0 果 有 在 
ors 

用 户 各 四 和 

I “对 竹 个 人 全 用 相同 9 用 户 各 和 宰 码 
ED) | 
AE | 此 本 接 格 被 存 入 “网 络 连接 " 妇 件 详 。 


回 任 阿 用 已 从 这 音 计 复 机 连 所 到 Internet 时 合用 此 帐户 名 和 晤 码 ) 


口 吹 交 到 其 而 上 潍 拓 二 不 天 天 这 接 的 全 扫 放 式 到 ) 


回 把 它 作为 默认 的 Internet 连接 仙 
要 创 津 此 注 接 并 关闭 向 导 ， 单 击 “ 完 成 ”。 


图 14.24 ”修改 用 户 的 账户 信息 图 14.25 ”完成 创建 网 络 连接 的 最 后 一 步 


用 户 在 最 后 一 步 中 ， 可 以 直接 单 击 “完成 ”按钮 ， 完 成 网 络 连 接 的 创建 。 如 果 用 户 在 
前 面 的 设置 中 有 错误 ， 也 可 以 单 击 “ 上 一 步 ”按钮 ， 到 达 相应 的 步骤 中 修改 相关 设置 。 

在 本 节 中 ， 主 要 向 用 户 介绍 了 创建 一 个 网 络 连接 的 方法 ， 并 介绍 了 其 中 的 一 些 相关 设 
置信 息 等 。 


14.3 ”相关 AT 指令 介绍 


本 书 在 前 面 的 小 节 中 ， 已 经 向 用 户 讲解 了 短信 猫 的 相关 硬件 以 及 这 些 硬件 的 连接 等 。 
用 户 真 正 操作 短信 猫 ， 还 需要 向 其 发 送 相应 的 指令 ， 这 些 指令 称 为 “AT 指令 ”。 在 本 节 
中 ， 将 向 用 户 讲解 短信 猫 中 相应 功能 的 AT 指令 代码 。 
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14.3.1 AT 指令 介绍 


AT 指令 是 指 计算 机 向 其 附加 的 硬件 设备 发 送 的 相关 功能 命令 ， 或 者 是 计算 机 所 带 的 
硬件 。 例 如 ， 硬 盘 读 写 操作 命令 等 。 
通常 情况 下 ， 用 户 可 以 通过 选择 “开始 ”| “运行 ”命令 ， 打 开 计算 机 中 的 “运行 ”对 
话 框 ， 并 在 文本 框 中 输入 cmd， 单 击 “ 确 定 ” 按 钮 ， 打 开 命 令 运行 对 话 框 ， 如 图 14.26 
所 示 。 


图 14.26 命令 运行 对 话 框 


用 户 在 该 窗口 的 光标 处 输入 “AT+ 空 格 +R”， 即 可 阅读 AT 指令 的 相关 帮助 信息 ， 如 
图 14.27 所 示 。 


[0 
UE] 


图 14.27 AT 指令 的 相关 帮助 信息 


很 注 意 : AT 指令 几乎 被 所 有 的 计算 机 及 其 辅助 硬件 所 支持 ， 并 且 通过 AT 指令 可 以 利用 
计算 机 向 任何 一 种 硬件 发 送 相应 的 AT 指令 以 实现 相应 的 功能 


14.3.2 AT 指令 详解 


在 前 面 一 节 中 ， 向 用 户 大 致 介绍 了 AT 指令 的 定义 、 作 用 及 其 发 送 方式 等 。 为 了 使 用 
户 加 深 对 AT 指令 的 理解 以 及 使 用 ， 在 本 节 中 将 以 表格 的 方式 向 用 户 介绍 常用 的 AT 指令 
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其 功能 含义 ， 如 表 14.1 所 示 。 


表 14.1 AT 指 令 及 其 功能 含义 


功 能 AT 命 令 格式 详细 说 明 

厂家 认证 AT+CGMI 获得 厂家 的 标识 

模式 认证 AT+CGMM 查询 支持 频段 

修订 认证 AT+CGMR 查询 软件 版 本 

生产 序号 AT+CGSN 查询 IMEI NO 

TE 设置 AT+CSCS 选择 支持 网 络 

查询 IMSI AT+CIMI 查询 国际 移动 电话 支持 认证 

卡 的 认证 AT+CCID 查询 SIM 卡 的 序列 号 

功能 列表 AT+GCAP 查询 可 供 使 用 的 功能 列表 

重复 操作 A/ 重复 最 后 一 次 操作 

关闭 电源 AT+CPOF 暂停 模块 软件 运行 

设置 状态 AT+CFUN 设置 模块 软件 的 状态 

活动 状态 AT+CPAS 查询 模块 当前 活动 状态 

报告 错误 AT+CMEE 报告 模块 设备 错误 

键盘 控制 AT+CKPD 用 字符 模拟 键盘 操作 

拨号 命令 ATD 拨打 电话 号 码 

挂机 命令 ATH 挂机 

回应 呼叫 ATA 当 模 块 被 呼叫 时 回应 呼叫 

详细 错误 AT+CEER 查询 错误 的 详细 原因 

DTMF 信 号 AT+HVID，+VTS +VTD 设 置 长 度 ，+VTS 发 送信 号 
重复 呼叫 ATDL 重复 拨 叫 最 后 一 次 号 码 

自动 拨号 AT%Dn 设备 自动 拨 叫 号 码 

自动 接应 ATS0 模块 自动 接听 呼叫 

呼 入 载体 AT+CICB 查询 呼 入 的 模式 ，DATA or FAX or SPEECH 
增益 控制 AT+VGR, +VGT +VGR 调 整 听 简 增益 ，+VGT 调 整 话 简 增益 
静音 控制 AT+CMUT 设置 话 简 静 音 

声 道 选 择 AT+SPEAKER 选择 不 同 声 道 (2 对 听 简 和 话 简 ) 
回声 取消 AT+ECHO 根据 场所 选择 不 同 回声 程度 

单 音 修改 AT+SIDET 选择 不 同 回声 程度 

初始 声音 参数 ATHVIP 恢复 到 厂家 对 声音 参数 的 默认 设置 
信号 质量 AT+CSQ 查询 信号 质量 

网 络 选择 AT+COPS 设置 选择 网 络 方式 〈 自 动 /手动 ) 
网 络 注册 AT+CREG 当前 网 络 注册 情况 

网 络 名 称 AT+WOPN 查询 当前 使 用 网 络 提供 者 

网 络 列表 AT+CPOL 查询 可 供 使 用 的 网 络 

输入 PIN AT+CPIN 输入 PIN 码 

输入 PIN2 AT+CPIN2 输入 第 二 个 PIN 码 

保存 尝试 AT+CPINC 显示 可 能 的 各 个 PIN 码 
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续 表 
功 能 AT 命令 格式 详细 说 明 
简单 上 锁 AT+CLCK 用 户 可 以 锁 住 状态 
改变 密码 AT+CPWD 改变 各 个 PIN 码 
选择 电话 短 AT+CPBS 选择 不 同 的 记忆 体 上 存储 的 电话 德 
读 取 电话 簿 AT+CPBR 读 取 电 话 簿 目录 
查找 电话 簿 AT+CPBF 查找 所 需 电话 目录 
写 入 电话 短 AT+CPBW 增加 电话 簿 条 目 
电话 号 码 查找 AT+CPBP 查找 所 需 电话 号 码 
动态 查找 AT+CPBN 查找 电话 号 码 的 一 种 方式 
用 户 号 码 AT+CNUM 选择 不 同 的 本 机 号 码 ( 因 网 络 服务 支持 不 同 ) 
避免 电话 簿 初始 化 AT+WAIP 选择 是 否 防止 电话 短 初 始 化 
选择 短 消息 服务 AT+CSMS 选择 是 否 打开 短 消息 服务 以 及 广播 服务 
短 消息 存储 AT+CPMS 选择 短 消息 优先 存储 区 域 
短 消息 格式 ATHCMGF 选择 短 消 息 支 持 格式 (TEXT or PDU) 
保存 设置 AT+CSAS 保存 +CSCA and +CSMP 参 数 设置 
恢复 设置 AT+CRES 恢复 +CSCA and +CSMP 参 数 设置 
显示 TEXT 参数 AT+CSDH 显示 当前 TEXT 模式 下 结果 代码 
新 消息 提示 ATHCNMI 选择 当 有 新 的 短 消息 来 时 系统 提示 方式 
读 短 消息 AT+CMGR 读 取 短 消息 
列 短 消息 AT+CMGL 将 存储 的 短 消息 列表 
发 送 短 消息 AT+CMGS 发 送 短 消息 
写 短 消息 ATHCMGW 写 短 消息 并 保存 在 存储 器 中 
从 内 存 中 发 短 消息 AT+CMSS 发 送 在 存储 器 中 保存 的 短 消息 
设置 TEXT 参 数 AT+CSMP 设置 在 TEXT 模 式 下 条 件 参数 
删除 短 消息 AT+CMGD 删除 保存 的 短 消息 
服务 中 心地 址 AT+CSCA 提供 短 消息 服务 中 心 的 号 码 
选择 广播 类 型 AT+CSCB 选择 系统 广播 短 消息 的 类 型 
广播 标识 符 AT+WCBM 读 取 SIM 卡 中 系统 广播 标识 符 
短 消息 位 置 修改 AT+WMSC 修改 短 消息 位 置 
短 消息 覆盖 AT+WMGO 写 一 条 短 消息 放 在 第 一 个 空位 
呼叫 转移 AT+CCFC 设置 呼叫 转移 
呼 入 载体 ATHCLCK 锁定 呼 入 载体 以 及 限制 呼 入 或 呼出 
修改 SS 密码 AT+CPWD 修改 提供 服务 密码 
呼叫 等 待 AT+CCWA 控制 呼叫 等 待 服务 
呼叫 线路 限定 AT+CLIR 控制 呼叫 线路 认证 
呼叫 线路 显示 AT+CLIP 显示 当前 呼叫 线路 认证 
已 连接 线路 认证 AT+COLP 显示 当前 已 连接 线路 认证 
计 费 显示 AT+CAOC 报告 当前 费用 
累计 呼叫 AT+CACM 累计 呼叫 费用 
累计 最 大 值 AT+CAMM 设置 累计 最 大 值 
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续 表 
功 能 AT 命令 格式 详细 说 明 
单位 计 费 AT+CPUC 设置 单位 费用 以 及 通话 计时 
多 方 通话 AT+CHLD 保持 或 挂 断 某 一 通话 线路 支持 多 方 通话 ) 
当前 呼叫 AT+CLCC 列 出 当前 呼叫 
补充 服务 AT+CSSN 设置 呼叫 增值 服务 
非 正式 补充 服务 AT+CUSD 非 正式 的 增值 服务 
保密 用 户 AT+CCUG 选择 是 否 在 保密 状态 
载体 选择 AT+CBST 选择 数据 传输 的 类 型 
选择 模式 AT+FCLASS 选择 发 送 数据 or 传真 
服务 报告 控制 AT+CR 是 否 报 告 提供 服务 
结果 代码 AT+CRC 报告 不 同 的 结果 代码 (传输 方式 、 语 音 或 数据 ) 
设备 速率 报告 ATHILRR 是 否 报告 当前 传输 速率 
协议 参数 AT+CRLP 设置 无 线 连接 协议 参数 
其 他 参数 AT+DOPT 设置 其 他 的 无 线 连 接 协 议 参数 
传输 速度 AT+FIM 设置 传真 发 送 的 速度 
接收 速度 AT+FRM 设置 传真 接收 的 速度 
HDLC 传 输 速度 AT+FTH 设置 传真 发 送 的 速度 (使 用 HDLC 协 议 ) 
HDLC 接 收 速度 AT+FRH 设置 传真 接收 的 速度 使 用 HDLC 协 议 ) 
停止 传输 并 等 待 AT+FTS 停止 传真 的 发 送 并 等 待 
静音 接收 AT+FRS 保持 一 段 静音 等 待 
固定 终端 速率 AT+IPR 设置 数据 终端 设备 速率 
其 他 位 符 AT+ICF 设置 停止 位 、 奇 偶 校 验 位 
流量 控制 AT+IFC 设置 本 地 数据 流量 
设置 DCD 信 号 AT&C 控制 数据 载体 探测 信号 
设置 DTR 信 号 AT&D 控制 数据 终端 设备 准备 信号 
设置 DSR 信 号 AT&S 控制 数据 设备 准备 信号 
返回 在 线 模式 ATO 返回 到 数据 在 线 模式 
结果 代码 抑制 ATQ 是 否 模块 回复 结果 代码 
DCE 回 应 格式 ATV 决定 数据 通信 设备 回应 格式 
默认 设置 ATZ 恢复 到 默认 设置 
保存 设置 AT&W 保存 所 有 对 模块 的 软件 修改 
自动 测试 AT&T 自动 测试 软件 
回应 ATE 是 否 可 见 输 入 字符 
恢复 厂家 设置 AT&F 软件 恢复 到 厂家 设置 
显示 设置 AT&V 显示 当前 的 一 些 参数 的 设置 
认证 信息 ATI 显示 多 种 模块 认证 信息 
区 域 环境 描述 AT+CCED 用 户 获取 区 域 参 数 
自动 接收 电 平 显示 AT+CCED 扩展 到 显示 接收 信号 强度 
一 般 显 示 AT+WIND 无 
人 a 无 
数据 计算 模式 AT+CRYPT 无 
键盘 管理 AT+EXPKEY 无 
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续 表 


AT 命令 格式 
PLMN 上 的 信息 AT+CPLMN 无 
模拟 数字 转换 测量 AT+ADC 无 
模块 事件 报告 AT+CMER 区 
选择 语言 AT+WLPR 选择 可 支持 的 语言 
增加 语言 AT+WLPW 增加 可 支持 的 语言 


读 GPIO 值 
写 GPIO 值 
放弃 命令 
设置 单 音 


AT+WIOR 
AT+WIOW 
AT+WAC 
AT+WIONE 


无 


用 于 放弃 SMS、SS and PLMN 
设置 音频 信号 (WMOi3) 
设置 DTMF 音 (WMOi3) 


本 节 主 要 向 用 户 讲解 了 一 些 常用 的 AT 指令 的 基本 格式 以 及 这 些 AT 指令 的 功能 含义 。 
通过 本 节 的 学 习 ， 用 户 可 以 知道 常用 短信 猫 的 直接 指令 操作 方法 等 。 
- 般 情况 下 ， 用 户 可 以 方便 地 使 用 这 些 AT 指令 直接 操作 计算 机 辅助 硬件 设备 等 。 例 
如 ， 用 户 向 短信 猫 发 送 AT 指令 ， 以 获取 SIM 卡 的 序列 号 ， 其 具体 操作 指令 如 下 : 
AT+CCID // 获 取 SIM 卡 的 序列 号 


当 短 信 猫 接收 到 该 指令 以 后 , 会 将 SIM 卡 的 序列 号 返回 。 这 样 ， 用 户 程序 便 可 以 从 串 
口 等 数据 缓冲 区 中 读 取 这 一 数据 并 显示 即 可 。 
各 注意 : 用 户 实际 使 用 AT 指令 时 ， 需 要 结合 实际 硬件 生产 商 的 相关 说 明文 档 进行 指令 的 
格式 化 。 这 是 因为 不 同 的 硬件 生产 商 可 能 会 有 不 同 的 AT 指令 格式 .。 但是， 这些 
AT 指令 格式 大 体 上 是 一 样 的 。 


14.4 封装 数据 结构 


前 面 的 内 容 已 经 向 用 户 讲解 了 关于 短信 猫 与 PC 配合 发 送 短 消 息 的 相关 硬件 设施 以 及 
AT 指令 等 内 容 。 本 节 将 向 用 户 介绍 在 实例 程序 中 常用 的 短 消息 数据 结构 的 封装 方法 以 及 
短 消息 类 的 封装 方法 等 。 


14.4.1 封装 消息 数据 结构 


首先 ， 用 户 需要 定义 短 消 息 的 数据 结构 并 且 添 加 相应 的 关键 成 员 变量 ， 以 方便 短 消 息 
的 发 送 等 操作 。 因 此 ， 在 本 章 实 例 中 ， 定义 了 短 消息 数据 结构 并 将 其 命名 为 SM_PARAM。 
该 数据 结构 定义 如 下 : 


typedef struct { 


char SCA[16]; // 短 消息 服务 中 心 号 码 (sMSC 地 址 ) 
char TPA[16]; // 目 标号 码 或 回复 号 码 (TP-DA 或 TP-RA) 
char TP PID; // 用 户 信息 协议 标识 〈TP-PID) 
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char TP DCS; // 用 户 信息 编码 方式 (TP-DCS) 

char TP SCTS[16]; // 服 务 时 间 戳 字符 串 〈TP_ScTS) ， 接 收 时 用 到 
char TP UD[160]; // 原 始 用 户 信息 《编码 前 或 解码 后 的 TP-UD) 
short index; // 短 消息 序号 ， 在 读 取 时 用 到 

} SM PARAM; 


在 该 结构 体 中 ， 包 括 了 发 送 短 消息 所 必须 的 一 些 信息 。 例 如 ， 短 消息 服务 中 心 号 码 、 
短 消息 接收 方 号 码 以 及 短 消息 操作 的 时 间 等 。 

然后 ， 用 户 可 以 在 实例 程序 中 ， 使 用 该 数据 结构 进行 短 消息 数据 的 初始 化 工作 。 代 码 
如 下 : 


要 // 省 略 部 分 代码 

SM PARAM m sm; // 定 义 结构 体 对 象 

m sm. SCA="13800009564"; // 初 始 化 短 消息 服务 中 心 号 码 
m sm. TPA="13547645285"; // 初 始 化 短 消息 接收 方 号 码 
Se // 省 略 部 分 代码 


在 代码 中 ， 用 户 首先 定义 了 短 消息 数据 结构 SM_PARAM 的 对 象 mm sm。 然后， 再 为 
该 结构 体 中 各 个 成 员 变 量 进 行 初始 化 。 

如 果 用 户 将 该 结构 体 中 的 各 个 数据 变量 初始 化 完成 以 后 ， 便 可 以 将 该 数据 结构 通过 串 
口 发 送 到 短信 猫 中 执行 。 代 码 如 下 : 


本 // 省 略 部 分 代码 

WriteFile (com, gm _ sm,sizeof (m sm),0,NULL); // 将 结构 体 数据 写 入 串口 

3 // 省 略 部 分 代码 

用 户 将 数据 写 入 相应 的 串口 后 ， 短 信 猫 中 的 相应 程序 会 定时 检测 串口 缓冲 区 中 是 否 存 
在 数据 。 如 果 短 信 猫 程序 检测 到 串口 缓冲 区 中 数据 后 ， 便 会 读 取 这 些 数据 并 执行 。 


14.4.2 ”封装 接收 消息 数据 结构 


当 短信 猫 接 收 到 对 方 发 送 或 者 回复 的 短 消息 时 ， 会 将 该 信息 内 容 发 送 到 计算 机 的 串口 
缓冲 区 中 ， 以 便 计 算 机 读 取 该 内 容 并 显示 。 所 以 ， 用 户 需 要 定义 一 个 相应 的 结构 体 ， 获 取 
该 信息 内 容 。 在 本 章 实例 中 ， 将 定义 结构 体 SM_BUFF 实现 该 功能 ， 其 定义 如 下 : 

typedef struct { 


int len; // 获 取 到 的 信息 长 度 
char data[16384]; // 获 取 到 的 信息 内 容 
} SM BUFF; 


该 结构 体 主要 被 用 于 接收 短信 猫 发 送 的 短 消息 内 容 或 者 短信 猫 的 应 答 状 态 等 。 例 如 ， 
用 户 封装 一 个 函数 gsmGetResponse0。 在 该 函数 中 ， 用 户 需 要 判断 短信 猫 的 应 答 状态 。 代 
码 如 下 : 


int gsmGetResponse (SM BUFF* PBuff) // 判 断 短信 猫 的 应 答 状 态 
{ 
int nLength; // 串 口 收 到 的 数据 长 度 
int nstate; // 定 义 应 答 状 态 变量 


nLength=ReadComm (&pBuff->data [pBuff->len], 128); 
// 从 串口 读数 据 ， 追 加 到 缓冲 区 尾部 


.417。 


第 3 篇 ”Visual C++ 串口 通信 


pBuff->len += nLength; // 自 动 扩展 信息 长 度 
nstate=GSM WAIT; // 确 定 短信 猫 的 应 答 状态 
if ((nLength > 0) && (pBuff->len >= 4)) ， // 判 断 读 取 到 的 串口 数据 不 为 空 
i 
if (strncmp (&pBuff->data[PBuff->len - 4], "OK\r\n", 4) == 0) 
// 比 较 两 个 字符 串 
{ 
nstate=GSM OK; // 如 果 相 同 , 则 返回 应 答 状 态 为 SSM_OK 
} 
else // 如 果 不 相同 , 则 返回 应 答 状 态 为 GSM_ 
ERR 


{ 
if (strstr(pBuff->data, "+CMS ERROR") != NULL) 
nstate=GSM ERR; // 设 置 短 信 猫 的 应 答 状 态 为 GSM_ERR 

| 

return nstate; // 返 回 短信 猫 的 应 答 状 态 

} 

在 代码 中 ， 用 户主 要 是 将 结构 体 SM_BUFF 中 的 成 员 变 量 len 与 串口 读 取 的 数据 长 度 
相 加 ， 得 到 最 新 的 数据 长 度 。 然 后 ， 再 判断 获取 到 的 数据 中 是 否 存在 需要 处 理 的 关键 字 。 
例如 ，"OK\\n" 等 。 


各 注意 : 用 户 在 使 用 该 结构 体 时 ， 需 要 首先 在 实例 程序 中 定义 一 个 全 局 的 结构 体 变量 。 否 
则 ， 用 户 对 该 结构 体 的 所 有 调用 都 会 失败 。 


14.5 ”封装 短 消息 类 


在 前 面 的 两 个 小 节 中 ， 向 用 户 讲述 了 相应 数据 结构 体 的 封装 方式 以 及 各 个 数据 变量 的 
含义 ， 并 且 使 用 实例 说 明了 相应 结构 体 的 使 用 方法 。 在 本 节 中 ， 将 向 用 户 讲解 短 消息 类 的 
封装 方法 等 。 


14.5.1 ”定义 短 消息 操作 函数 和 数据 结构 
在 本 节 中 ， 用 户 需 要 将 短 消息 数据 相关 的 数据 结构 或 者 操作 函数 封装 到 一 个 文件 中 ， 


便于 用 户 查 找 以 及 提高 程序 的 运行 效率 等 。 本 节 中 将 该 封装 文件 名 设置 为 Sms， 其 定义 文 
件 即 头 文件 Sms.h 定义 如 下 : 


Se // 用 户 信息 编码 方式 
#define GSM 7BIT 0 
#define GSM 8BIT 4 
#define GSM UCS2 8 
// 应 答 状 态 
#define GSM WAIT 0 // 等 待 ， 不 确定 
#define GSM OK zl //0K 
#define GSM ERR = / /ERROR 
typedef struct { // 短 消息 参数 结构 。 其 中 ， 字 符 串 以 \0 结尾 
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char 
char 
char 
char 
char 
char 


SCA[16]; 
TPR[16]7 
TP_PID; 
TP_DCS; 

TP SCTS[16]; 
TP UD[160]; 


short index; 

} SM PARAM; 
typedef struct { 

int len; 

char data[16384]; 
} SM BUFF; 

int gsmBytes2string (const unsigned char* pSsrc, char* pDst, int nsrcLength); 
// 短 消息 相关 操作 函数 


int 
int 
int 
int 
int 
int 
int 
int 
int 
int 
int 


gsmString2Bytes (Const char* pSrc, unsigned char* pDst, 


gsmEncode7bit (const 
gsmDecode7bit (const 
gsmEncode8bit (const 
gsmDecode8bit (const 
gsmEncodeUcs2 (const 
gsmDecodeUcs2 (const 
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// 短 消息 服务 中 心 号 码 〈SMSC 地 址 》 

// 目 标号 码 或 回复 号 码 (TP-DA 或 TP-RA) 

// 用 户 信息 协 议 标识 (TP-PID) 

// 用 户 信息 编码 方式 (TP-DCS) 

// 服 务 时 间 戳 字符 串 〈TP_ScTS) ， 接 收 时 用 到 
// 原 始 用 户 信 息 〈 编 码 前 或 解码 后 的 TP-UD) 
// 短 消息 序号 ， 在 读 取 时 用 到 


// 读 取 应 答 的 缓冲 区 


// 数 据 长 度 
// 数 据 内 容 


char* PSrc，unsigned 
unsigned char* psrc, 
char* psrc, unsigned 
unsigned char* psrc, 
char* pSsrc, unsigned 
unsigned char* psrc, 


gsmInvertNumbers (Const char* pSrc, char* 
gsmSerializeNumbers (Const char* pSsrc, char* pDst, int nsrcLength); 
gsmEncodePdu(const SM PARAM* pSrc, char* pDst); 
gsmDecodePdu(const char* pSrc, SM PARAM* pDst); 


// 初 始 化 短 消息 操作 


BOOL gsmInit(); 
Int gsmSendMessage (SM PARAM* pSsrc); 


int gsmReadMessageList (); 
int gsmDeleteMessage (int index); 
int gsmGetResponse (SM BUFF* PBuff) 


int nsrcLength); 
int nsrcLength); 
int nsrcLength); 
int nsrcLength); 
int nsrcLength); 
char* pDst, int nsrcLength); 
char* pDst, int nsrcLength); 
pDst, int nsrcLength); 


char* pDst, 
char* pDst, 
char* pDst, 
char* pDst, 


// 短 消息 发 送 


// 短 消息 列表 设置 
// 删 除 短 消息 
// 获 取 短信 猫 的 应 答 状 态 


int gsmParseMessageList (SM PARAM* pMsg, SM BUFF* pBuff); 
// 从 短 消息 列表 中 解析 短 消息 


接 下 来 ,用 户 还 需要 在 实现 文件 “Sms.cpp” 中 实现 以 上 函数 的 相关 功能 并 添加 相应 的 
功能 代码 。 代 码 如 下 : 


#include 
#include 


"stdafx.h" 
"Sms .h" 


#include "Comm.h" 
可 打印 字符 串 转换 为 字 节 数据 
如 : "C8329BFD0E01" --> {0xC8, 0x32, Ox9B, OxFD, Ox0E, 0x01} 
输入 : psrc - 源 字符 串 指针 
nsrcLength - 源 字符 串 长 度 
输出 : pDst - 目标 数据 指针 
返回 : 目标 数据 长 度 */ 

int gsmString2BYtes (const char* pSrc, unsigned char* pDst, int nsrcLength) 


/* 


! 


for (int i=0; i < nsrcLength; i += 2) 


if (({*pSrc >= '0') && (*pSrc <= '9°')) 


{ 


*pDst=(*pSrc 一 


Sg 


// 包 含 相关 的 头 文件 


// 输 出 源 字符 串 的 高 4 位 
// 将 源 字 符 串 向 左 移动 4 位 
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else 


+pDst= (+pSrc - 'R' + 10) << 4; 
3 // 源 字符 串 指针 自 加 
if ((*psrc>="'0') && (*psrc<='9'))  // 输 出 源 字符 串 的 低 4 位 
*#pDst |= *pSrC - "077 
wn 


*pDst |= *psrc - "RAR' + 10; 
上 


PSTFC++7 
TRACE ("%s"vpSrc) 7 // 向 调试 器 输出 窗口 输出 源 字符 串 
PpDst++; 
TRACE ("$s", pDst); // 向 调试 器 输出 窗口 输出 目标 字符 串 
} 
return (nsrcLength / 2); // 返 回 目标 数据 长 度 


i 

/*” 字 节 数 据 转换 为 可 打印 字符 串 

如 : {0xCc8, 0x32, 0x9B, OxFD, Ox0E, 0x01} --> "C8329BFDOE01" 

输入 : psrc - 源 数据 指针 

nsrcLength - 源 数据 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 人 

int gsmBYtes2String (const unsigned char* pSrc, char* pDst, int nsrcLength) 
本 


const char tab[]="0123456789ABCDEF"; // 定 义 0x0 一 0xf 字符 查找 表 

for (int i=0; i < nsrcLength; i++) // 遍 历 源 字符 串 

{ 
*pDst++=tab[*pSTC >> 4]; // 输 出 源 字符 串 的 高 4 位 
*pDst++=tab[*pSrc & Ox0f]; // 输 出 源 字 符 串 的 低 4 位 
pSrct++; 

} 

*pDst=" \0'; // 为 输出 字符 串 添加 结束 符 \0 

return (nSrcLength * 2); // 返 回 目标 字符 串 长 度 

} 

/* ”7bit 编码 // 函 数 说 明 


输入 : psrc - 源 字符 串 指针 

nSrcLength - 源 字符 串 长 度 

输出 : pDst - 目标 编码 串 指针 

返回 : 目标 编码 串 长 度 a 

int gsmEncode7bit(const char* pSrc, unsigned char* pDst, int nsrcLength) 
{ 


int nsrc; // 源 字符 串 的 计数 值 

int nDst; // 目 标 编码 串 的 计数 值 

int nCchar; // 当 前 正在 处 理 的 组 内 字符 字 节 的 序号 ， 范 围 是 0 一 7 

unsigned char nLeft; // 上 一 字 节 残余 的 数据 

nsrc=0; // 计 数值 初始 化 

nDst=0; 

while (nsrc < nsrcLength) 

{ 
nChar=nsrc & 7; // 取 源 字符 串 的 计数 值 的 最 低 3 位 
if(nChar == 0) // 处 理 源 串 的 每 个 字 节 
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{ // 组 内 第 一 个 字 节 ， 只 是 保存 起 来 , 待 处 理 下 一 个 字 节 时 使 用 
nLeft=*pSsrc; 
} 
else 
{ // 组 内 其 他 字 节 ， 将 其 右边 部 分 与 残余 数据 相 加 ， 得 到 
一 个 目标 编码 字 节 
*pDst=(*+pSrC << (8-nChar)) | nLeft; 
// 将 该 字 节 剩 下 的 左边 部 分 ， 作 为 残余 数据 保存 起 来 
nLeft=*pSrc >> nChar; 
// 修 改 目 标 串 的 指针 和 计数 值 
PpDst++; // 自 加 
nDst++; 
3 
pSrc+t+? // 修 改 源 串 的 指针 和 计数 值 
nSrc+t+? 
} 
return nDst; // 返 回 目标 串 长 度 
} 
/* ”7bit 解码 


输入 : psrc - 源 编码 串 指针 

nSrcLength - 源 编码 串 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 */ 

int gsmDecode7bit (const unsigned char* pSrc, char* pDst, int nsrcLength) 


{ 


int nsrc; // 源 字符 串 的 计数 值 

int nDst; // 目 标 解 码 串 的 计数 值 

int nByte; // 当 前 正在 处 理 的 组 内 字 节 的 序号 ,范围 是 0 一 6 
unsigned char nLeft; // 上 一 字 节 残余 的 数据 

nsrc=0; // 计 数值 初始 化 

nDst=0; 

nByte=0; // 组 内 字 节 序号 和 残余 数据 初始 化 

nLeft=0; 


// 将 源 数 据 每 7 个 字 节 分 为 一 组 ， 解 压缩 成 8 个 字 节 
// 循 环 该 处 理 过 程 ， 直 至 源 数据 被 处 理 完 
// 如 果 分 组 不 到 7 字 节 ， 也 能 正确 处 理 


while(nsrc<nsrcLength) 


// 将 源 字 节 右边 部 分 与 残余 数据 相 加 ， 去 掉 最 高 位 ， 
得 到 一 个 目标 解码 字 节 
*pDst=( (*pSrc << nByte) | nLeft) & 0x7f7 


// 将 该 字 节 剩 下 的 左边 部 分 ， 作 为 残余 数据 保存 起 来 
nLeft=*pSrc >> (7-nBYyte) 


pDst++; // 修 改 目标 串 的 指针 和 计数 值 
DDS 七 + 十 7 
nBytett+; // 修 改 字 节 计 数值 
if(nByte == 7) // 如 果 循环 到 了 一 组 的 最 后 一 个 字 节 
{ 
*pDst=nLeft; // 额 外 得 到 一 个 目标 解码 字 节 
PDst++; // 修 改 目 标 串 的 指针 和 计数 值 
nDst++; 
nByte=0; // 组 内 字 节 序号 和 残余 数据 初始 化 
nLeft=0; 
下 
pSrc+t+; // 修 改 源 串 的 指针 和 计数 值 
nSrc++? 
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} 


*#pDst=" \0'; // 为 输出 字符 串 添加 结束 符 \0 
return nDst; // 返 回 目 标 串 长 度 
/* ”8bit 编码 


输入 : psrc - 源 字符 串 指针 

nsrcLength - 源 字符 串 长 度 

输出 : pDst - 目标 编码 串 指 针 

返回 : 目标 编码 串 长 度 */ 

int gsmEncode8bit (const char* pSsrc, unsigned char* pDst, int nsrcLength) 
{ 


memcpy (pDst, pSsrc, nsrcLength); // 复 制 字符 串 

return nsrcLength; // 返 回 处 理 字符 串 的 长 度 值 
} 
/* ”8bit 解码 


输入 : psrc - 源 编码 串 指针 

nSrcLength - 源 编码 串 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 

int gsmDecode8bit (const unsigned char* pSrc, char* pDst, int nsrcLength) 


{ 


memcpy (pDst, pSrc, nsrcLength); // 复 制 字符 串 
*pDst="\0'; // 为 输出 字符 串 添加 结束 符 
return nsrcLength; // 返 回 处 理 字 符 串 的 长 度 值 
} 
/* ”UCS2 编码 


输入 : psrc - 源 字符 串 指针 

nsrcLength - 源 字符 串 长 度 

输出 : pDst - 目标 编码 串 指针 

返回 : 目标 编码 串 长 度 2 

int gsmEncodeUcs2 (const char* PSrC，unsigned char* pDst, int nsrcLength) 


i 


int nDstLength; // 定 义 UNICODE 宽 字 符 数目 
WCHAR wchar[128]; // 定 义 UNICODE 串 缓冲 区 
nDstLength=MultiByteToWideChar (CP ACP, 0, pSrc, nsrcLength, wchar, 128); 
// 将 字符 串 转化 为 UNICODE 串 
for (int i=0; i<nDstLength; i++) // 高 低 字 节 对 调 并 输出 
{ 
*pDst++=wchar [i] >> 8; // 先 输出 高 位 字 节 
*pDst++=wchar [i] & Oxff; // 后 输出 低位 字 节 
} 
TRACE ("%s", wchar); // 判 断 处 理 是 否 成 功 
return nDstLength * 2; // 返 回 目标 编码 串 长 度 
} 
/* ”UCS2 解码 


输入 : psrc - 源 编码 串 指针 

nsrcLength - 源 编码 串 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 eh 

int gsmDecodeUcs2 (const unsigned char* pSsrc, char* pDst, int nsrcLength) 
{ 


int npstLength; // 定 义 UNICODE 宽 字符 数目 
WCHAR wchar[128]; // 定 义 UNICODE 串 缓冲 区 
for (int i=0; i<nsrcLength/2; i++) // 高 低 字 节 对 调 ， 拼 成 UNICODE 
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wchar[i]=*pSrct+ << 8; // 先 输出 高 位 字 节 

wchar[i] |= *pSTC++F // 后 输出 低位 字 节 
} 
nDstLength=WideCharToMultiByte (CP ACP, 0, wchar, nsrcLength/2, pDst, 160, 
NULL, NULL); 


// 将 UNICODE 字符 串 转换 为 字符 串 
pDst [nDstLength]="\0°'; / /为 输出 字符 串 添加 结束 符 
return nDstLength; // 返 回 目标 字符 串 的 长 度 值 


} 

/* 正常 顺序 的 字符 串 转换 为 两 两 颠倒 的 字符 串 ， 若 长 度 为 奇数 ， 补 王 凑 成 偶数 

如 : "8613851872468" --> "683158812764F8" 

输入 : pSrc - 源 字 符 串 指针 

nSrcLength - 源 字符 串 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 Wh 

int gsmInVertNumbers (Const char* PSrC， char* pDst, int nsrcLength) 


{ 


int nDstLength; // 定 义 目标 字符 串 长 度 
char ch; // 定 义 字符 变量 ， 用 于 保存 一 个 字符 
nDstLength=nSrcLength; // 复 制 串 长 度 值 
for (int i=0; i<nsrcLength;i+=2) /1 改变 字符 串 的 排列 顺序 
{ 
ch=*pSrct+; // 保 存 先 出 现 的 字符 
#PDSt++=*DSTC++7 // 复 制 后 出 现 的 字符 
*#pDst++=ch; // 复 制 先 出 现 的 字符 
} 
if(nsrcLength && 1) // 判 断 源 串 长 度 是 否 为 奇数 
{ 
*(pDst-2)="F"; // 如 果 是 奇数 ， 那 么 补 F 
nDstLength++; // 目 标 串 长 度 自 加 1 
站 
*pDst="'\0'; // 为 输出 字符 串 添加 结束 符 
return nDstLength; // 返 回 目标 字符 串 长 度 


} 
/* ”将 顺序 调整 后 的 字符 串 转换 为 正常 顺序 


的 字符 串 如 : "683158812764F8" 一-> 

"8613851872468"™ 

输入 : psrc - 源 字符 串 指针 

nSrcLength - 源 字符 串 长 度 

输出 : pDst - 目标 字符 串 指针 

返回 : 目标 字符 串 长 度 */ 

int gsmSerializeNumbers (const char* pSrc, char* pDst, int nsrcLength) 


{ 


int nDstLength; // 定 义 目标 字符 串 长 度 

char ch; // 定 义 变量 ， 用 于 保存 一 个 字符 

nDstLength=nsrcLength; // 复 制 串 长 度 

for (int i=0; i<nsrcLength;i+=2) // 改 变 字符 串 的 顺序 

{ 
Ch=*pSrc++; // 保 存 先 出 现 的 字符 
*#*DDSt++=*DSTC++7 // 复 制 后 出 现 的 字符 
*pDst++=ch; // 复 制 先 出 现 的 字符 
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if(*(pDst-1) == 'F') 
PpDSst-—=? 
nDstLength——; 

} 

*#*pDst="'\0'; 

return nDstLength; 

} 


/* ”PDU 编码 ， 用 于 编制 、 发 送 短 消息 


输入 : psrc - 源 PDU 参数 指针 
输出 : pDst - 目标 PDU 串 指针 
返回 : 目标 PDU 串 长 度 */ 


// 判 断 字符 串 最 后 的 字符 是 否 为 下 


// 将 字符 串 自 减 
// 目 标 字符 串 长 度 减 1 


// 为 输出 字符 串 添加 结束 符 
// 返 回 目标 字符 串 长 度 


int gsmEncodePdul(const SM PARAM* pSsrc, char* pDst) 


int nLength; 
int nDstLength; 
unsigned char buf[256]7 


nLength=strlen (PSrc->SCR) 


// 内 部 用 的 串 长 度 

// 目 标 PDU 串 长 度 

// 内 部 用 的 缓冲 区 
//SMSC 地 址 信息 段 
//SMSC 地 址 字符 串 的 长 度 


buf[0]=(char) ((nLength & 1) == 0 ? nLength : nLength + 1) / 2 + 17 


buf[1]=0x91; 


//SMSC 地 址 信息 长 度 
// 固 定 : 用 国际 格式 号 码 


nDstLength=gsmBytes2string (buf, pDst, 2); 


// 转 换 2 个 字 节 到 目标 PDU 串 


nDstLength += gsmInvertNumbers (PSrc->SCR，&pDst [nDstLength], nLength); 


nLength=strlen (pSrc->TPA); 
buf [0]=0x11; 


buf [1]=0; 
buf[2]=(char)nLength; 
度 ) 

buf [3]=0x91; 


// 转 换 SMSC 号 码 到 目标 PDU 串 

//TPDU 段 基本 参数 、 目 标 地 址 等 

//TP-DA 地 址 字符 串 的 长 度 

// 发 送 短信 (TP-MTI=01) ，TP-VP 用 相对 格式 
(TP-VPF=10) 

//TP-MR=0 

// 目 标 地 址 数字 个 数 〈TP-DA 地 址 字符 串 真实 长 


// 固 定 : 用 国际 格式 号 码 


nDstLength += gsmBytes2Sstring (buf, gpDst[nDstLength], 4); 


// 转 换 4 个 字 节 到 目标 PDU 串 


nDstLength += gsmInvertNumbers (pSrc->TPA, &pDst[nDstLength], nLength); 


nLength=strlen (pSrc->TP_UD); 
buf [0]=pSrc->TP_PID; 

buf [1]=pSsrc->TP_DCS; 

buf [2]=0; 

if(pSrc->TP_DCS == GSM 7BIT) 
{ 


buf [3]=nLength; 


// 转 换 TP-DA 到 目标 PDU 串 

//TPDU 段 协议 标识 、 编 码 方式 、 用 户 信息 等 
// 用 户 信息 字符 串 的 长 度 

// 协 议 标识 (TP-PID) 

// 用 户 信息 编码 方式 (TP-DCS) 

// 有 效 期 (TP-VP) 为 5 分 钟 

// 判 断 编码 方式 


//7-bit 编码 方式 
// 编 码 前 的 长 度 值 


nLength=gsmEncode7bit (pSrc->TP UD, &buf[4], nLength+1) + 4; 


|; 


else 
if (pSrc->TP_ DCS == GSM UCS2) 
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buf[3]=gsmEncodeUcs2(pSrc->TP 0D，&buf[4]，nLength) 7; 


nLength=buf[3] + 4; 


else 


// 转 换 TP-DA 到 目标 PDU 串 
//nLength 等 于 该 段 数据 长 度 


//8-bit 编码 方式 


buf[3]=gsmEncode8bit (pSrc->TP UD, gbuf[4], nLength); 


nLength=buf[3] + 4; 
} 


// 转 换 TP-DA 到 目标 PDU 串 
//nLength 等 于 该 段 数 据 长 度 


nDstLength += gsmBytes2string (buf, é&pDst[nDstLength], nLength); 


return nDstLength; 

} 

/* ”PDU 解码 ， 用 于 接收 、 阅 读 短 消息 
输入 : psrc - 源 PDU 串 指针 

输出 : pDst - 目标 PDU 参数 指针 
返回 : 用 户 信息 串 长 度 */ 


// 转 换 该 段 数据 到 目标 PDU 串 
// 返 回 目标 字符 串 长 度 


int gsmDecodepPdu (const char* pSrc, SM PARAM+* pDst) 


{ 

int nDstLength; 

unsigned char tmp; 

unsigned char buf[256]; 
gsmSstring2Bytes (pSrc, &tmp, 2); 
tmp=(tmp - 1) * 2; 

PSrc += 47 


// 定 义 目标 PDU 串 长 度 

// 定 义 内 部 用 的 临时 字 节 变量 

// 定 义 内 部 用 的 缓冲 

// 取 SMSC 地 址 信息 段 字 符 串 长 度 值 
/VSMSC 号 码 串 长 度 

// 将 指针 后 移 ， 忽 略 了 SMSC 地 址 格式 


gsmSerializeNumbers (pSrc, pDst->SCA, tmp); 


pSsrc += tmp; 


gsmstring2Bytes (pSrc, &tmp, 2); 
pSrc += 27 
gsmString2BVYtes (pSrc, &tmp, 2); 
if(tmp & 1) tmp += 1; 

pSrc += 47 


// 转 换 SMSC 号 码 到 目标 PDU 串 

// 将 指针 后 移 

//TPDU 段 基本 参数 

// 取 基本 参数 

// 将 指针 后 移 

// 取 出 回复 号 码 长 度 

// 调 整 奇偶 性 

// 指 针 后 移 ， 忽 略 了 回复 地 址 (TP-RA) 格式 


gsmSerializeNumbers (pSrc, pDst->TPA, tmp); 


pSsrc += tmp; 


// 取 TP-RA 号 码 
// 指 针 后 移 
//TPDU 段 协议 标识 、 编 码 方式 、 用 户 信息 等 


gsmString2BYtes (PSrc， (unsigned char*) gpDst->TP PID, 2); 


pSrc += 27 


// 取 协议 标识 (TP-PID) 
// 将 指针 后 移 


gsmString2BYtes (PSrc， (unsigned char*) gpDst->TP DCS, 2); 


PSrc += 27 


// 取 编码 方式 (TP-DCS) 
// 指 针 后 移 


gsmSerializeNumbers (pSrc, pDst->TP_ SCTS, 14); 


pSsrc += 14; 
gsmstring2Bytes (pSrc, &tmp, 2); 
pSrc += 27 

if (pDst->TP_ DCS == GSM 7BIT) 

{ 


// 服 务 时 间 戳 字符 串 〈TP_SCTS) 
// 将 指针 后 移 

// 用 户 信息 长 度 (CTP-UDL) 

// 将 指针 后 移 

//7-bit 解码 方式 


nDstLength=gsmString2Bytes (pSrc, buf, tmp & 7? (int)tmp *7/4+2: 


(int)tmp * 7 / 4); 
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// 进 行 格式 转换 
gsmDecode7bit (buf, pDst->TP UD, nDstLength); 
// 转 换 到 TP-DU 
nDstLength=tmp; 
} 
else 
if (pDst->TP DCS == GSM UCS2) //UCS2 解码 


{ 
nDstLength=gsmString2Bytes (pSrc, buf, tmp * 2); 
// 进 行 格式 转换 
nDstLength=gsmDecodeUcs2 (buf, pDst->TP UD, nDstLength); 
// 转 换 到 TP-DU 


else 
{ 
//8-bit 解码 
nDstLength=gsmString2Bytes (pSrc, buf, tmp * 2); 
// 格 式 转换 
nDstLength=gsmDecode8bit (buf, pDst->TP UD, nDstLength); 
// 转 换 到 TP-DU 
} 
return nDstLength; // 返 回 目标 字符 串 长 度 
} 
BOOL gsmInit() // 初 始 化 GSM 状态 
{ 
char ans[128]; // 定 义 应 答 字符 数组 
// 测 试 GSM-MODEM 的 存在 性 
WriteComm ("RTN\r"，3) 7 // 向 串口 写 入 AT 指令 字符 串 
ReadComm(ans, 128); // 读 取 串 口 缓冲 区 中 的 数据 
if (strstr (ans， "OK") == NULL) // 判 断 字符 串 
return FALSE; 
WriteComm ("ATEO\r", 5); // ECHO OFF 
ReadComm(ans, 128); 
WriteComm ("AT+CMGF=0\r", 10); //PDU 模式 
ReadComm(ans，128) 7 
return TRUE; 
| 
/* ”发 送 短 消息 ， 仅 发 送 命令 ， 不 读 取 应 答 
输入 : psrc - 源 PDU 参数 指针 */ 
int gsmSendMessage (SM PARAM* psrc) 
{ 
int npduLength; // 定 义 PDU 串 长 度 
unsigned char nsmscLength; // 定 义 变量 ， 用 于 SMSC 串 长 度 
int nLength; // 串 口 收 到 的 数据 长 度 
char cmd[16]; // 定 义 命令 串 
char pdu[512]; //PDU 串 
char ans[128]; // 应 答 串 
npduLength=gsmEncodePdu (psrc, pdu); // 根 据 PDU 参数 ， 编 码 PDU 串 
strcat (pdu, "\x01a"); // 以 快捷 键 Ctrl1+2 结束 
gsmstring2Bytes (pdu, &nsmscLength, 2); // 取 PDU 串 中 的 SMsc 信息 长 度 
nsmscLength++; // 加 上 长 度 字 节 本 身 


// 命 令 中 的 长 度 ， 不 包括 SMSC 信息 长 度 以 数据 字 节 计 
sprintf (cmd,，"AT+CMGS=%d\r",，npduLength / 2 - nsmscLength); // 生 成 命令 
TRACE ("%s", cmd); 
TRACE ("%s\n", pdu); 


WriteComm(cmd, strlen(cmd)); // 将 命令 字符 串 写 入 串口 
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nLength=ReadComm (ans, 128); // 从 串口 读 取 应 答 数 据 
if(nLength == 4 && strncmpl(ans, "\r\n> ", 4) == 0) 


// 根 据 能 否 找 到 "\r\n>" 决 定 成 功 与 否 


return WriteComm(pdu，strlen (pdu)); // 得 到 肯定 回答 ， 继 续 输 出 PDU 串 

return 0; 

} 

/* ” 读 取 短 消息 ， 仅 发 送 命 令 ， 不 读 取 应 答 
用 +CMGL 代替 +CMGR， 可 一 次 性 读 出 
全 部 短 消息 *7 
int gsmReadMessageList() 
{ 


return WriteComm("AT+CMGL\r", 8); // 写 入 串口 数据 
} 

/* 删除 短 消息 ， 仅 发 送 命令 ， 不 读 取 应 答 

输入 : index - 短 消息 序号 ，1-255 sh 


int gsmDeleteMessage (int index) 


{ 


char cmd[16]; // 定 义 命令 字符 数组 
sprintf (cmd, "AT+CMGD=%d\r", index); // 生 成 命令 
return WriteComm(cmd, strlen(cmd)); // 写 入 串口 数据 


j 
/* 读 取 GSM MODEM 的 应 答 ， 可 能 是 一 部 


分 

输出 : pBuff - 接收 应 答 缓冲 区 

返回 : GSM MODEM 的 应 答 状 态 ，GSM_WRIT/GSM OK /GSM ERR 
备注 : 可 能 需要 多 次 调用 才能 完成 读 取 一 次 应 

答 ， 首 次 调用 时 应 将 pBuff 初始 化 */ 

int gsmGetResponse (SM BUFF* pBuff) 

{ 


int nLength; // 定 义 串口 收 到 的 数据 长 度 


int nstate; 
// 从 串口 读数 据 ， 追 加 到 缓冲 区 尾部 
nLength=ReadComm (&pBuff->data[pBuff->len], 128); 


pBuff->len += nLength; 


nstate=GSM WAIT; // 确 定 GSM MODEM 的 应 答 状 态 
if ((nLength > 0) && (pBuff->len >= 4)) 
{ 


if (strncmp (&pBuff->data[PBuff->len - 4], "OK\r\n", 4) == 0) 
nstate=GSM OK; 

else 

if (strstr(pBuff->data, "+CMS ERROR") != NULL) 


nstate=GSM _ ERR; 
} 


return nstate; // 返 回 状态 标志 
} 

/* ”从 列表 中 解析 出 全 部 短 消息 

输入 : pBuff - 短 消息 列表 缓冲 区 

输出 : pMsg - 短 消息 缓冲 区 

返回 : 短 消 息 条 数 */ 


int gsmParseMessageList (SM PARAM* pMsg, SM BUFF* pBuff) 
0 


int nMsg; // 定 义 短 消息 计数 值 
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char* ptr; / /定义 内 部 用 的 数据 指针 
nMsg=0; 
ptr=pBuff->data; 
whilel( (ptr=strstr(ptr, "+CMGL:")) != NULL) 
// 循 环 读 取 每 一 条 短 消 息 ， 以 “+CMGL”: 开 头 
{ 
ptr += 6; // 跳 过 “+CMGL”: ， 定 位 到 序号 
sscanf (ptr,，"%d"，&pMsg->index); // 读 取 序 号 
EeeSEESEE BEE NENRJ // 查 找 下 一 行 
if (ptr != NULL) 
1 
ptr 27 // 跳 过 "\r\n"， 定 位 到 PDU 
gsmDecodePdu (ptr, pMsg); //PDU 串 解 码 
PMsg++; / /准备 读 下 一 条 短 消息 
nMsg++; // 短 消息 计数 加 1 
} 
} 
return nMsg; // 返 回 短 消息 计数 


| 


在 本 节 中 ， 用 户主 要 是 在 实例 程序 中 ， 将 所 有 的 关于 短 消息 的 操作 函数 或 结构 体 全 痢 
封装 在 统一 的 文件 中 。 这 样 ,用 户 使 用 时 比较 方便 .例如 ,在 上 面 的 程序 中 , 函数 ReadComm() 
是 专门 用 于 操作 串口 的 函数 。 因 此 ， 在 14.5.2 节 中 ， 将 向 用 户 介 绍 怎样 将 串口 操作 的 相关 
函数 进行 封装 。 


14.5.2 ”定义 串口 操作 函数 


首先 ， 用 户 需 要 在 实例 程序 中 ， 创 建 一 个 新 文件 ， 名 称 修改 为 Comm.h。 该 文件 的 作 
用 是 声明 相关 的 串口 操作 函数 。 其 具体 代码 如 下 : 


#if !defined(COMM H ) 
#define COMM H 
BOOL OpenComm (const char* pPort, int nBaudRate=57600, int nparity=NOPARITY, 


int nByteSize=8, int nSstopBits=ONESTOPBIT); // 打 开 串 口 
BOOL CloseComm(); // 关 闭 串口 
int ReadComm (void* pData, int nLength); // 读 取 串 口 
int WriteComm(void* pData, int nLength); // 写 入 串口 
#endif 


在 头 文件 Comm.h 中 ， 用 户 声明 了 常用 的 串口 操作 函数 的 原型 。 
然后 ， 用 户 在 实例 程序 中 创建 一 个 文件 ， 名 称 修改 为 Comm.cpp。 该 文件 的 作用 是 实 
现 串口 操作 相关 函数 的 定义 。 代 码 如 下 : 


#include "stdafx.h" // 包 含 头 文件 
#include "Comm.h" 

HANDLE hComm; // 定 义 串 口 设备 句柄 
/* ”打开 串口 


输入 : pPort - 串口 名 称 或 设备 路 径 ， 可 
用 "coM1" 或 "\\ .\COM1" 两 种 方式 ， 本 书 
建议 使 用 后 者 

nBaudRate - 波 特 率 
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PParity 一 奇偶 校 验 

nByteSize - 数据 字 节 宽 度 

nstopBits - 停止 位 #/ 

BOOL OpenComm (Const char* pPort, int nBaudRate, int nparity, int nByteSize, 
int nstopBits) 

{ 


DCB dcb; / /串口 控制 块 
COMMTIMEOUTS timeouts={ / /串口 超时 控制 参数 
100, // 读 字符 间隔 超时 时 间 : 100 ms 
Ey // 读 操作 时 每 字符 的 时 间 : 1 ms 〈n 个 字符 总 共 为 n ms) 
500, // 基 本 的 额外 的 ) 读 超时 时 间 : 500 ms 
1 // 写 操作 时 每 字符 的 时 间 : 1 ms (n 个 字符 总 共 为 nms) 
100}; // 基 本 的 《额外 的 ) 写 超时 时 间 : 100 ms 
hCcomm=CreateFile (PPort， // 串 口 名 称 或 设备 路 径 
GENERIC READ | GENERIC WRITE, 
// 读 写 方式 
o> // 设 置 共 享 方式 为 独占 
NULL, // 默 认 的 安全 描述 符 
OPEN_ EXISTING, // 创 建 方式 
0, // 使 用 默认 文件 属性 
NULL); // 不 需要 模板 文件 
if(hComm == INVALID HANDLE VALUE) return FALSE; 
// 打 开 串 口 失败 
GetCommstate (hComm, &dcb); // 获 取 串 口 信息 并 存 入 DCB 数据 结构 中 
dcb.BaudRate=nBaudRate; // 为 DCB 结构 体重 新 赋值 


dcb.ByteSize=nByteSize; 
dcb.Parity=nParity; 
dcb.StopBits=nStopBits; 
SetCommState (hComm, &dcb); // 将 串口 信息 存 入 DCB 结构 体 中 
SetupComm (hComm, 4096,1024) ;  // 设 置 输入 输出 缓冲 区 大 小 
SetCommTimeouts (hComm, gtimeouts); // 设 置 超时 
return TRUE; // 返 回 TRUE 
} 
BOOL CloseComm() // 关 闭 串口 的 函数 
| 
return CloseHandle (hComm); // 调 用 API 函数 关闭 串口 句柄 
} 
/* ” 写 串 口 
输入 : pData - 待 写 的 数据 缓冲 区 指针 
nLength - 待 写 的 数据 长 度 
返回 : 实际 写 入 的 数据 长 度 */ 
int WriteComm(void* pData, int nLength) 
于 


DWORD dwNumWrites; // 串 口 发 出 的 数据 长 度 
WriteFile(hComm, pData, (DWORD)nLength, &dwNumWrite, NULL); 
return (int)dwNumWrite; // 返 回 实际 写 入 串口 的 字 节 数 

} 

/* ” 读 串 口 


输入 : pData - 待 读 的 数据 缓冲 区 指针 
nLength - 待 读 的 最 大 数据 长 度 

返回 : 实际 读 出 的 数据 长 度 */ 

int ReadComm(void* pData, int nLength) 
{ 
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DWORD dwNumRead; // 串 口 收 到 的 数据 长 度 
ReadFile(hComm, pData, (DWORD)nLength, &dwNumRead, NULL); 
return (int)dwNumRead; // 返 回 实际 读 取 串 口 的 字 节 数 


用 户 使 用 以 上 代码 时 ， 只 需要 将 头 文件 Comm.h 包含 到 实例 程序 中 即 可 。 例 如 ， 包 含 
本 节 中 的 头 文件 ， 代 码 如 下 : 


#include "Comm.h"™ 


// 包 含 头 文件 Comm.h 
用 户 使 用 上 面 的 代码 后 ， 便 可 以 在 程序 中 调用 文件 Comm.cpp 中 的 任何 相关 函数 了 。 


全 注意 : 用 户 使 用 代码 “#include” 包 含 指定 头 文件 时 ,如 果 该 头 文件 的 名 称 使 用 符号 “《&》” 
括 起 来 ， 则 表示 该 头 文件 为 系统 预定 义 的 头 文件 。 否 则 ， 表 示 用 户 自 定义 的 头 
文件 。 


14.5.3 ”封装 短 消息 类 


在 前 面 两 节 中 ， 已 经 向 用 户 详细 介绍 了 串口 操作 相关 函数 和 短 消息 操作 相关 函数 的 声 
明 以 及 定义 文件 的 封装 。 在 本 节 中 ， 将 使 用 前 面 封装 的 相关 文件 和 功能 函数 实现 短 消息 类 
的 定义 和 功能 实现 等 。 


1. 定义 短 消息 类 


首先 ， 用 户 需 要 在 实例 工程 中 ,对 短 消息 类 进行 定义 并 修改 该 类 名 为 CSmsTraffic。 其 
具体 定义 代码 如 下 : 


#if !defined(AFX SMSTRAFFIC H 3A4D81DE C363 42D6 8A47 3BAO17BFBF56 IN 
CLUDED ) 

#define 

AFX SMSTRAFFIC H 3A4D81DE C363 42D6 8A47 3BA017BFBF56 INCLUDED 

#if MSC VER > 1000 

#pragma once 

#endif // MSC VER > 1000 


#include "sms.h" // 包 含 所 需 头 文件 
#include "Comm.h" 

#define MAX SM SEND 128 // 发 送 队 列 长 度 
#define MAX SM RECV 128 // 接 收 队列 长 度 
class CSmsTraffic // 定 义 短 消息 类 

{ 
public: 

CsmsTraffic(); // 构 造 函数 

Virtual ~CSmsTraffic()7 

int m nsendIn; // 发 送 队 列 的 输入 指针 
int m nsendout; // 发 送 队 列 的 输出 指针 
int m nRecvIin; // 接 收 队列 的 输入 指针 
int m nRecvout; // 接 收 队列 的 输出 指针 
SM PARAM m SmSend[MAX SM SEND]; // 发 送 短 消息 队列 

SM PARAM m SmRecv[MAX SM SEND]; // 接 收 短 消息 队列 
CRITICAL SECTION m csSend; // 与 发 送 相关 的 临界 段 
CRITICAL SECTION m csRecv; // 与 接收 相关 的 临界 段 
HANDLE m hKillThreadEvent; // 通 知 子 线程 关闭 的 事件 
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HANDLE m hThreadKilledEvent; // 子 线程 关闭 时 产生 的 事件 
void PutSendMessage (SM PARAM* PSmParam) 7 
// 将 短 消息 放 入 发 送 队列 


BOOL GetSendMessage (SM PARAM* PSmParam) 7 


// 从 发 送 队 列 中 取 一 条 短 消息 


void PutRecvMessage (SM PARAM* pSmParam, int nCount); 


// 将 短 消息 放 入 接收 队列 
BOOL GetRecvMessage (SM PARAM* PSmParam) 7 


// 从 接收 队列 中 取 一 条 短 消息 
static UINT SmThread(LPVOID lpParam) ; // 短 消息 收发 处 理子 线程 
hy 
#endif // 短 消息 类 定义 完毕 
用 户 通过 上 面 的 代码 可 以 清楚 地 了 解 到 关于 短 消息 类 CSmsTraffic 的 常用 函数 的 定义 
方式 。 这 样 ， 用 户 使 用 该 类 的 成 员 函 数 时 ， 可 以 很 快 知道 所 调用 的 函数 相关 类 型 等 。 


外 注意 : 用 户 在 定义 短 消息 类 时 ， 一 定 要 在 类 定义 前 ， 在 程序 中 添加 代码 包含 该 类 所 需要 
的 头 文件 。 


2. 实现 短 消息 类 


现在 ， 用 户 可 以 在 程序 中 实现 短 消息 类 中 的 所 有 功能 函数 的 基本 功能 了 。 用 户 在 实例 
工程 中 , 新 建 一 个 文件 并 命名 为 SmsTraffic.cpp, 然后 便 可 以 在 该 文件 中 添加 实现 函数 功能 
的 代码 了 。 短 消息 类 的 成 员 函 数 实现 代码 如 下 : 


#include "stdafx.h" // 包 含 相关 头 文件 
#include "smsTest.h" 

#include "smsTraffic.h" 

#ifdef _DEBUG 

#undef THIS FILE 

static char THIS FILE[]= FILE ; 

#define new DEBUG NEW 


#endif 

L771711717117177171171IIIIIIIIIIIIIIIIII I 
短 消息 类 成 员 函 数 的 基本 实现 

PIIINIIIIIIII TI INI NSIT OI TII IITI VIIIIII TTIII TTTII NIIII AAS ILLITIIIIL 
CSmsTraffic::CSmsTraffic() // 短 消息 类 构造 函数 实现 

上 


m nsendIn=0; // 初 始 化 该 类 中 的 数据 成 员 


m hKillThreadEvent=CreateEvent (NULL, TRUE, FALSE, NULL); 


// 创 建 事 件 对 象 
m hThreadKilledEvent=CreateEvent (NULL, TRUE, FALSE, NULL); 
InitializeCriticalSection(&m_csSend) 7 // 初 始 化 临界 区 对 象 


InitializeCriticalSection(&m csRecV) 7 


AfxBeginThread (SmThread, this, THREAD PRIORITY NORMAL); 


// 启 动 子 线程 
i 
CSmsTraffic::~CSmsTraffic() // 短 消息 类 的 析 构 函数 实现 
{ 
SetEvent (m hKillThreadEvent); // 设 置 事件 对 象 为 有 信号 状态 
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WaitForSingleObject (m hThreadKilledEvent, INFINITE); 


// 等 待 子 线程 关闭 
DeleteCriticalSection (gm csSend); // 删 除 临 界 区 对 象 
DeleteCriticalSection(&m csRecv); 
CloseHandle (m hKillThreadEvent); // 关 闭 事件 句柄 


CloseHandle (m hThreadKilledEvent); 
} 
void CSmsTraffic::PutSendMessage (SM PARAM* pparam) 
// 放 入 一 条 短 消息 到 发 送 队 列 
{ 


EnterCriticalsection (gm csSsend); // 进 入 临界 区 对 象 中 
memcpy (&m SmSend[m nSendIn], pparam, sizeof (SM PARAM)); 
// 复 制 数据 
m_nSendIn++7 // 自 加 
if (m nsendIn >= MAX SM SEND) // 如 果 发 送 队 列 的 长 度 大 于 规定 值 
m_nSendIn=07 // 则 将 队列 长 度 变量 设置 为 0 
} 
LeaveCriticalsection (gm csSsend); // 离 开 临 界 区 


BOOL CSsmsTraffic::GetSendMessage (SM PARAM* pparam) 


// 从 发 送 队 列 中 ， 取 出 一 条 短 消息 
{ 


BOOL fSuccess=FALSE; // 定 义 布尔 变量 并 初始 化 
EnterCriticalSection(&m csSend); // 进 入 临界 区 对 象 
if (m_nSendout != m nsendIn) // 判 断 队 列 长 度 是 否 相 等 
{ 
memcpy (pparam, &m SmSend[m nSendOut], sizeof (SM PARAM)); 
// 复 制 数 据 
m nSendOut++; // 增 加 队列 长 度 
if (m_nSendOut >= MAX SM SEND) // 如 果 队 列 长 度 大 于 规定 值 
{ 
m nsendout=0; // 则 将 该 值 设置 为 0 
} 
fSuccess=TRUE; // 返 回 TRUE 表示 成 功 
} 
LeaveCriticalSection(g&m csSsend); // 离 开 临 界 区 
return fSuccess; // 返 回 状态 标志 
} 
void CsmsTraffic::PutRecvMessage (SM PARAM* pparam, int nCount) 
// 将 短 消息 放 入 接收 队列 中 
‘ 
EnterCriticalSection (gm csRecv); // 进 入 临界 区 
for (int i=0; i < nCount; i++) // 循 环 判断 
{ 
memcpy (&m SmRecv[m nRecvIin], pparam, sizeof (SM PARAM)); 
// 复 制 数据 
m nRecvIn+t+; // 接 收 消息 队列 长 度 值 增加 
if (m nRecvIn >= MAX SM RECV) // 如 果 接 收 消息 队列 长 度 大 于 规定 值 
m nRecvIn=0; // 设 置 接收 消息 队列 长 度 值 为 0 
} 
pparamt++; // 增 加 计数 值 
} 
LeaveCriticalSection (&m_ csRecv); // 离 开 临 界 区 
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BOOL CSmsTraffic: :GetRecvMessage (SM PARAM* pparam) 


BOOL fsSuccess=FALSE; 
EnterCriticalSection (gm csRecv); 
if (m nRecvOout != m nRecvIn) 

{ 


// 从 接收 队列 中 取 一 条 短 消息 


// 定 义 并 初始 化 变量 
// 进 入 临界 区 
// 判 断 消息 队列 长 度 是 否 相同 


memcpy (Pparam, &m SmRecv[m nRecvOout], sizeof(SM PARAM)); 


m nRecvOut++; 
if (m nRecvout >= MAX SM RECV) 
{ 
m nRecvOout=0; 
} 
fSuccess=TRUE; 
} 
LeaveCriticalSsection(&m csRecv); 
return fSuccess; 
E 
UINT CSmsTraffic::SmThread (LPVOID lParam) 
是 
CsmsTraffic* p=(CSmsTraffic *)1Pararm7 
int nMsg; 
int nDelete; 
SM BUFF buff; 
SM PARAM param[256]; 
CTime tmOrg, tmNow; 
enum { 
stBeginRest, 
stContinueRest, 
stSendMessageRequest, 
stSendMessageResponse, 
stSendMessageWaitIdle， 
stReadMessageRequest, 
stReadMessageResponse, 
stDeleteMessageRequest, 
stDeleteMessageResponse, 
stDeleteMessageWaitIdle, 
stExitThread 
} nstate; 
nstate=stBeginRest; 
while (nstate != stExitThread) 
{ 
switch (nstate) 
{ 


case stBeginRest: 


// 复 制 数 据 
// 增 加 接收 消息 队列 的 长 度 值 
// 如 果 队 列 长 度 值 大 于 规定 值 


// 设 置 队列 长 度 值 为 0 
// 设 置 状 态 标志 位 TRUE 
// 离 开 临 界 区 对 象 


// 实 现 线程 函数 


// 将 参数 强制 转换 为 短 消息 类 型 
// 收 到 短 消息 条 数 

// 目 前 正在 删除 的 短 消息 编号 
// 接 收 短 消息 列表 的 缓冲 区 
// 发 送 /接收 短 消息 缓冲 区 

// 上 次 和 现在 的 时 间 ， 计 算 超 时 用 
// 定 义 联合 结构 体 

// 开 始 休息 / 延 时 

// 继 续 休息 / 延 时 

// 发 送 短 消息 

// 读 取 短 消息 列表 到 缓冲 区 

// 发 送 不 成 功 ， 等 待 6SM 就 绪 
// 发 送 读 取 短 消息 列表 的 命令 
// 读 取 短 消息 列表 到 缓冲 区 

// 删 除 短 消息 

// 删 除 短 消息 

// 删 除 不 成 功 ， 等 待 6SM 就 绪 
// 退 出 

// 处 理 过 程 的 状态 

// 设 置 联合 体 

/7 发送 和 接收 处 理 的 状态 循环 


// 比 较 状 态 


TRACE ("State=stBeginRest\n"); 
tmOrg=CTime: :GetCurrentTime (); 


nstate=stContinueRest; 


break; 
case stContinueRest: 


// 获 取 当 前 系统 时 间 
// 为 联合 体 赋值 
// 跳 出 循环 


TRACE ("State=stContinueRest\n"); 


Sleep(300); 


// 线 程 函 数 暂停 0.3 秒 


tmNow=CTime: :GetCurrentTime (); 
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// 获 取 系统 当前 时 间 
// 获 取 发 送 消息 是 否 成 功 


if (p->GetSendMessage (&param[0]) ) 


{ 
nSstate=stSendMessageRequest; 
// 有 待 发 短 消息 时 , 立即 运行 
} 
else if (tmNow-tmorg >= 5) // 待 发 短 消息 队列 空 , 休息 5 秒 
{ 
nstate=stReadMessageRequest; 


// 转 到 读 取 短 消息 状态 
} 
break; // 跳 出 循环 


Case stSendMessageRequest: 
TRACE ("State=stSendMessageRequest\n"); 
gsmSendMessage (gparam[0]); // 向 短信 猫 发 送 消息 
memset (&buff，0，sizeof (buff)); ”// 初 始 化 缓冲 区 
tmOrg=CTime: :GetCurrentTime (); 


// 获 取 系统 当前 时 间 
nstate=stSendMessageResponse; 

// 为 联合 体 赋值 
break; // 跳 出 循环 


case stSendMessageResponse: 
TRACE ("State=stSendMessageResponse\n"); 


Sleep (100); // 线 程 函 数 暂停 0.1 秒 
tmNow=CTime: :GetCurrentTime (); 


// 获 取 当 前 系统 时 间 
Switch (gsmGetResponse(&buff) ) 
// 获 取 短 信 猫 响应 
{ 
case GSM OK: // 查 看 短信 猫 响应 码 


TRACE(" GSM OK %d\n", tmNow - tmorg); 
nSstate=stBeginRest; 
// 为 联合 体 赋值 
break; // 跳 出 循环 
case GSM ERR: 
TRACE(" GSM ERR $%d\n", tmNow - tmorg); 
nSstate=stSendMessageWaitIdle; 
break; 
default: // 默 认 状态 
TRACE(" GSM WAIT %d\n", tmNow - tmorg); 
if (tmNow - tmorg >= 10) 
// 查 看 是 否 超时 大 于 10 秒 


TRACE(" Timeout!\n"); 
nstate=stSendMessageWaitIdle; 


{ 


break; // 跳 出 循环 
case stSendMessageWaitIdle: 
Sleep(500); // 线 程 暂停 执行 0.5 秒 


nstate=stSendMessageRequest; 
// 直 到 发 送 成 功 为 止 
break; 
case stReadMessageRequest: 
TRACE ("State=stReadMessageRequest\n"); 


gsmReadMessageList (); // 读 取信 息 列表 
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memset (&buff，0，sizeof (buff) ); // 初 始 化 缓冲 区 
tmOrg=CTime: :GetCurrentTime ()7 
// 获 取 系统 当前 时 间 
nstate=stReadMessageResponse; 
break; 
case stReadMessageResponse: 
TRACE ("State=stReadMessageResponse\n"); 
Sleep(100); 
tmNow=CTime: :GetCurrentTime () 7 
Switch (gsmGetResponse(&buff) ) 
// 根 据 短信 猫 的 响应 码 判断 
{ 
case GSM OK: // 短 信 猫 响应 成 功 
TRACE(" GSM OK %d\n", tmNow - tmorg); 
nMsg=gsmParseMessageList (param, &buff); 
if (nMsg > 0) // 获 取 的 消息 数目 大 于 0 
{ 
Pp->PutRecvMessage (param, nMsg); 
// 获 取 接 收 到 的 消息 
nDelete=0; // 初 始 化 变量 
nSstate=stDeleteMessageRequest; 


else // 若 获取 到 的 消息 为 空 
! 
nstate=stBeginRest; 
} 
break; 
case GSM ERR: // 短 信 猫 响应 错误 


TRACE(" GSM ERR %d\n", tmNow - tmorg); 
nstate=stBeginRest; 
break; 
default: // 短 信 猫 其 他 响应 码 
TRACE(" GSM WAIT %d\n", tmNow - tmorg); 
if (tmNow - tmOrg >= 15) 
//15 秒 超 时 


TRACE(" Timeout!\n"); 
nstate=stBeginRest; 


1 


} 
break; 
case stDeleteMessageRequest: 
TRACE ("State=stDeleteMessageRequest\n"); 
// 删 除 消息 
if (nDelete < nMsg) 
{ 
gsmDeleteMessage (param[nDelete] .index); 
// 删 除 短 信 猫 消息 
memset (&buff，0，sizeof (buff)); 


// 初 始 化 缓冲 区 
tmOrg=CTime: :GetCurrentTime ()7 
// 获 取 系统 当前 时 间 
nstate=stDeleteMessageResponse; 
} 
else 
{ 
nstate=stBeginRest; 
. 
break; 
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Case StDeleteMessageResponse: 
TRACE ("State=stDeleteMessageResponse\n"); 
Sleep(100); 
tmNow=CTime: :GetCurrentTime (); 

Switch (gsmGetResponse (gbuff)) 
/ /根据 短 信 猫 的 响应 码 进行 判断 
{ 
case GSM OK: 
TRACE(" GSM OK %d\n", tmNow — tmorg); 
nDeletet+; 
nstate=stDeleteMessageRequest; 
break; 
Case GSM ERR: 
TRACE(" GSM ERR %d\n", tmNow — tmorg); 
nSstate=stDeleteMessageWaitIdle; 
break; 
default: 
TRACE(" GSM WAIT $%d\n", tmNow - tmorg); 
if (tmNow —- tmorg >= 5) 
/1/5 秒 超时 
1 
TRACE(" Timeout!\n"); 
nstate=stBeginRest; 


» 
break; 
case stDeleteMessageWaitIdle: 
TRACE ("State=stDeleteMessageWaitIdle\n"); 
Sleep(500); 
nstate=stDeleteMessageRequest; 
// 直 到 删除 成 功 为 止 
break; 


} 
// 等 待 事件 对 象 受 信 
if (dwEvent == WAIT OBJECT 0) nstate=stExitThread; 


} 
SetEvent (p->m hThreadKilledEvent); // 将 事件 对 象 设置 为 受信 状态 


return 9999; // 返 回 数字 
} 


DWORD dwEvent=WaitForSingleObject (p->m hKillThreadEvent, 20); 


在 上 面 的 代码 中 ， 由 于 短 消息 类 需要 多 线程 的 支持 。 所 以 ， 用 户 在 该 类 的 定义 中 添加 
了 一 个 线程 函数 SmThread0。 当 用 户 需 要 启动 该 线程 函数 时 ， 调 用 函数 AfxBeginThread() 


启动 即 可 。 


实例 程序 中 ， 用 户 为 了 避免 使 短 消 息 类 在 同一 时 间 对 同一 资源 进行 操作 。 所 以 ， 在 程 


序 中 使 用 了 事件 对 象 以 及 临界 区 对 象 等 实现 线程 同步 的 方法 。 


很 注意 : 用 户 在 随 书 光盘 中 可 以 参考 实例 代码 以 及 运行 结果 ， 以 便 分 析 在 该 类 中 ， 为 什么 


需要 使 用 多 线程 和 线程 同步 等 。 


在 本 节 中 ,主要 向 用 户 介绍 了 短 消 息 类 的 基本 组 成 和 定义 实现 等 ， 并 且 通 过 实例 代码 向 
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户 讲解 了 短 消 息 类 的 运行 过 程 和 成 员 函 数 的 实现 方法 。 在 14.6 节 中 ， 将 向 用 户 讲解 本 实 
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例 程序 的 主要 功能 部 分 ， 即 发 送 与 接收 。 


14.6 发 送 和 接收 


用 户 从 前 面 所 学 习 到 的 知识 中 ， 已 经 对 短信 猫 的 相关 硬件 、AT 指令 以 及 短 消息 类 的 
封装 等 非常 了 解 熟悉 了 。 因 此 ， 在 本 节 中 ， 将 主要 向 用 户 讲解 实例 界面 的 美化 以 及 PC 如 
何 向 短信 猫 发 送 或 接收 数据 的 相关 知识 。 


14.6.1 ”创建 实例 工程 界面 
为 了 使 实例 程序 拥有 更 好 的 交互 性 ， 用 户 应 该 使 用 VC 的 资源 管理 器 对 程序 界面 进行 
美化 。 本 节 将 向 用 户 介 绍 如 何 美化 程序 界面 以 及 代码 编写 。 
1. 选择 工程 应 用 程序 类 型 


用 户 创建 本 章 实例 工程 时 ， 使 用 MFC 应 用 程序 向 导 进行 工程 相关 信息 的 设置 。 在 设 
置 步骤 的 第 一 步 时 ， 选 择 该 工程 的 应 用 程序 类 型 应 该 为 “ 单 文档 ”类 型 ， 如 图 14.28 所 示 。 


了 FC 应 用 程序 向 导 


习 文档 让 看 体系 结构 支持 轨 


您 的 资源 使 用 的 语言 是 : 
| 中 文中 国 ] [APPWZCHS.DLU 


外 完 记 取消 


14.28 ”选择 应 用 程序 的 类 型 为 单 文档 


各 注意 : 用 户 在 这 一 步 进行 设置 时 ， 也 可 以 将 应 用 程序 类 型 指定 为 多 文档 类 型 。 那 么 ， 用 
户 便 可 以 在 实例 工程 中 创建 多 个 应 用 程序 界面 了 。 


2. 添加 参数 设置 对 话 框 


在 该 实例 工程 中 ， 用 户 需 要 为 应 用 程序 添加 一 个 参数 设置 对 话 框 ， 便 于 用 户 动态 地 输 
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入 应 用 程序 运行 实现 功能 的 相应 信息 。 例如 , 与 短信 猫 通信 的 串口 号 以 及 通信 的 波 特 率 等 。 
在 VC 资源 管理 器 中 ， 用 户 使 用 鼠标 将 所 需 控 件 等 拖 到 对 话 杠 
面板 中 ， 并 设置 其 适合 的 大 小 ， 如 图 14.29 所 示 。 


全 注意 : 该 对 话 框 中 ，“ 短 消息 服务 号 码 ”是 指 用 户 的 移动 服 
务 提供 商 的 短 消 息 中 心 号 码 。 
参数 设置 对 话 框 设计 成 功 以 后 ， 用 户 可 以 在 应 用 程序 启动 


时 ， 弹 出 该 对 话 框 。 也 可 以 在 菜单 中 添加 相应 的 菜单 命令 ， 弹 图 14.29 参数 设置 对 话 框 
出 该 对 话 框 。 如 果 用 户 选 择 在 应 用 程序 启动 时 弹出 该 对 话 框 ， 则 其 代码 如 下 : 


BOOL CSmsTestRpp: :InitInstance() // 应 用 程序 初始 化 函数 
CSettingsD1g dlg; // 定 义 参 数 设置 对 话 框 类 变量 
dlg.m strPort=m strPort; // 为 参数 设置 对 话 框 中 的 各 项 赋值 


dlg.m strRate=m strRate; 
dlg.m strsmsc=m strSmsc; 
if (dlg.DoModal ()==IDOK) // 如 果 用 户 单 击 “ 确 定 ”按钮 
{ 
m strPort=dlg m strPort; // 则 将 用 户 输入 的 信息 传 给 变量 
m strRate=dlg m strRate; 
m strsmsc=dlg m strsmsc; 
} 
else // 如 果 用 户 单 击 “ 放 弃 ” 按 钮 
{ 
return FALSE; // 则 返回 false 
} 
| 


用 户 在 程序 中 ， 添 加 以 上 代码 ， 则 在 应 用 程序 启动 时 ， 会 首先 弹出 参数 设置 对 话 框 。 

如 果 用 户 选 择 从 菜单 命令 中 启动 该 对 话 框 ， 则 应 该 在 程序 框架 的 菜单 项 中 ， 添 加 一 个 
“设置 ”菜单 项 。 首 先 ， 在 VC 的 资源 管理 器 中 ， 添 加 一 个 新 菜单 项 ， 并 命名 为 “设置 ”。 
本 实例 中 ， 该 菜单 项 位 于 “文件 ”菜单 下 ， 如 图 14.30 所 示 。 


DRATRFRANE (one) 
IEFITPTPCETEZTTETE3E3 le 
[四 FTIR -cS-[m 7w| 
[ED Dn css membersl | © CAboutDio EE 

| 吾 晤 瑟 ， 四 
| x Mw MW WWD [下 
smelectresource 


lerator 
5 Dialog 


on 
国 IDLSsETTINE 
国 IDR_MAINFF 
IDR_sMsTE 


Menu 
昌 IDR_MAINFF 

+» Sting Tahle 

二 Toolbar 


图 14.30 添加 “设置 ”菜单 项 
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然后 ， 用 户 可 以 双击 该 菜单 项 ， 程 序 会 弹出 “菜单 项 目 属性 ”对 话 框 。 在 该 对 话 框 
中 ， 用 户 可 以 为 指定 菜单 项 设置 相应 的 菜单 信息 ， 如 图 14.31 所 示 。 


全 注意 : 在 本 章 实例 程序 中 ， 将 该 菜单 项 的 ID 修改 为 ID SETTING。 这 样 ， 修 改 菜单 项 
的 ID 方便 于 用 户 快速 为 其 添加 消息 响应 函数 。 


1D: [EE 习 标明 四 ， 报 年 6T- 


厂 分 隔 符 办 ”三 弹出 0] 三 非 活动 中 断 加 : | 无 
厂 已 复 选 四 。” 厂 已 变 灰 (@] 三 帮助 叫 
提示 


14.31 “菜单 项 目 属性 ”对 话 框 


用 户 修改 子 菜单 项 的 ID 后 , 便 可 以 为 其 添加 菜单 单 击 消息 响应 函数 了 。 在 VC 主 界面 
中 ， 使 用 快捷 键 CtrlHW， 打 开 MFC ClassWizard 对 话 框 ， 如 图 14.32 所 示 。 


Message Maps | Member Variables | Automation | ActiveX Events | class Info | 
Broject: Class name: FREE 
SmsTest 可 lcsetingsDig | 

Add Function... 
EASettingsDIg.h, EASettingsDIg.cpp 
Object IDs: Messages: Delete Function 


ID_FILE_PRINT_PREVIEW 四 dt God 
ID_FILE_PRINT_SETUP UPDATE_COMMAND_UI Est Cede 
ID_FILE_SAVE 

ID_FILE_SAVE_AS 

ID_NEXT_PANE 

ID_PREV_PANE 


Member functions: 

¥ DoDataExchange 

W OnCancel ON_IDCANCEL:BN_CLICKED 
W OninitDialog ON_WM_INITDIALOG 

W onok ON_IDOK:BN_CLICKED 


Description: Handle a command (from menu, accel cmd button] 


图 14.32 MFC ClassWizard 对 话 框 


i 


日 户 在 MFC 应 用 程序 向 导 对 话 框 中 , 先 在 Object IDs 列表 中 , 找到 用 户 修改 的 对 应 菜 
单项 有 D。 再 在 Messages 列表 中 选择 COMMAND。 然后 ， 单 击 Add Function 按钮 为 该 菜单 
项 添加 消息 响应 函数 并 可 以 修改 响应 函数 名 ， 如 图 14.33 所 示 。 

用 户 添加 菜单 消息 响应 函数 成 功 后 ， 可 以 将 参数 设置 对 话 框 的 打开 功能 应 用 在 该 函数 
中 ， 代 码 如 下 : 


void CsmsTestApp: :OnSetting() / /菜单 消 息 响 应 函数 
i 
CSettingsD1g dlg; // 定 义 参数 设置 对 话 框 
dlg.m strPort=m strPort; // 初 始 化 参数 设置 对 话 框 中 的 参数 
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dlg.m strRate=m strRate; 
dlg.m strSmsc=m strSmsc; 


if(d1g.DoModal ()==IDOK) // 如 果 用 户 单 击 该 对 话 框 中 的 “ 确 
定 ” 按 钮 
if(m strPort !=dlg.m strPort) // 判 断 新 设置 的 端口 是 否 相同 
下 
AfxMessageBox ("端口 设置 在 下 次 启动 程序 时 生效 ") ; 
// 显 示 消息 框 
FE 
m strPort=dlg.m strPort; // 保 存 各 个 变量 值 


m strRate=dlg.m strRate; 
m strsmsc=dlg.m strsmsc; 


Message Maps | Member Variables | Automation | ActiveX Events | Class Info | 


Project: Class name: Add Class... ~ 
SmsTest 副 


|csmsTeswiew - 


dMSmsTestlSmsTestView.h, d4.4SmsTestSmsTestView.cpp 
Object IDs: Messages: Delete Function 


1D_FILE_PRINT_PREVI 


Edit Code 


Message: COMMAND 
eper lore Object ID: ID_SETTING 
V DestroyWindow 
VY onBeginPrinting 

¥ onDraw 

¥ onEndprinting 

YoniniialUpdate 忆 


Description: Handle a command from menu, accel cmd button} 


确定 取消 
图 14.33 ”添加 菜单 消息 响应 函数 并 修改 函数 名 


上 面 的 代码 主要 是 响应 菜单 项 “设置 ”的 消息 响应 函数 。 在 该 消息 响应 函数 中 ， 用 户 
显示 参数 设置 对 话 框 以 及 初始 化 其 中 的 参数 值 等 。 程 序 运行 后 ， 用 户 可 以 单 击 菜单 项 “ 设 
置 ”， 程 序 会 弹出 参数 设置 对 话 框 ， 如 图 14.34 所 示 。 

用 户 在 使 用 过 程 中 ， 如 果 需 要 临时 修改 串口 号 。 那 么 ， 程 序 在 修改 完成 之 后 ， 应 该 提 
醒 用 户 此 次 修改 将 在 下 次 启动 程序 时 生效 ， 如 图 14.35 所 示 。 


点 0 江口， 二 到 ] 
通信 速率 : |57600 了 ] 


短 消 息 服务 号 码 : |3800311500 
一 | 


图 14.34 使 用 菜单 项 打开 参数 设置 对 话 框 图 14.35 ”提示 用 户 修改 将 在 下 次 启动 程序 时 生效 
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外 注意 : 用 户 在 实际 编程 时 ， 本 小 节 中 所 介绍 的 两 种 打开 参数 设置 对 话 框 的 方法 ， 最 好 仅 
选择 其 中 的 一 种 即 可 。 


3. 设置 列表 视图 界面 


为 了 应 用 程序 界面 的 友好 性 和 数据 显示 的 直观 性 ， 用 户 还 需要 为 应 用 程序 界面 添加 列 
表 视 图 界面 等 。 

首先 ， 用 户 在 创建 该 工程 时 ， 必 须 在 应 用 程序 向 导 的 最 后 一 步 ， 将 视图 类 的 基 类 修改 
为 CListView。 这 样 ， 用 户 在 程序 中 才能 将 界面 进行 列表 显示 ， 如 图 14.36 所 示 。 


HTFC 应 用 程序 向 导 - 步 枝 6 共 6 步 


应用 程序 向 导 为 您 创建 了 以 下 秽 : 


头 文件 [EJ]: 
发 送 手机 短信 View.h 


执行 文件 中 : 
用 这 手机 本 信 View.cp 


‘iy | ry | | 
图 14.36 ”修改 工程 视图 类 的 基 类 


然后 ， 在 视图 类 的 函数 PreCreateWindow0 中 为 其 添加 列表 报告 模式 。 代 码 如 下 : 


BOOL CSmsTestView: :PreCreateWindow (CREATESTRUCTE& cs) 
1 


cs.style |= LVS_SHOWSELALWAYS | LVS_ REPORT; // 添 加 列表 报告 样式 
return CListView::PreCreateWindow(cs); // 返 回 其 基 类 的 该 函数 
} 


全 注意 : 函数 PreCreateWindow0 是 在 程序 创建 窗口 之 前 进行 调用 ， 所以， 用户 的 许多 初始 
化 工作 都 可 以 在 该 函数 中 进行 。 关 于 结构 体 
CREATESTRUCT 的 说 明 ， 请 用 户 参 考 本 书 前 Rr 
面 章节 中 相关 的 基础 知识 。 

用 户 编译 并 运行 以 上 程序 , 会 发 现在 程序 视图 的 最 上 

方 是 一 行 灰 色 ， 如 图 14.37 所 示 。 

出 现 以 上 错误 的 原因 在 于 用 户 只 是 使 视图 窗口 具有 

了 列表 视图 的 功能 ， 但 是 并 没有 将 其 进行 初始 化 。 所 以 ， 

户 会 在 视图 窗口 的 最 上 方 看 见 一 行 灰色 。 现在 , 用 户 在 图 14.37 显示 列表 视图 发 生 错 误 
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视图 类 的 初始 化 函数 OnInitialUpdate0 中 ， 进 行列 表 的 初始 化 。 代 码 如 下 : 


void CSmsTestView: :OnInitialUpdate () // 视 图 类 初始 化 函数 

中 
CListView::OnInitialUpdate (); // 调 用 基 类 的 初始 化 函数 
CListCtrlg ListCtrl=GetListCtrl()7 // 获 取 列 表 控件 的 指针 对 象 


ListCtrl.InsertColumn (0,， "号 码 "，LVCFMT_LEFT，100); // 向 列表 中 插入 项 目 
ListCtr1.InsertColumn (1, "时 间 ", LVCEMT LEFT, 140); 
ListCtrl.InsertCcolumn (2,， "消息 内 容 "，LVCEMT LEFT, 500); 

SetTimer (1, 1000, NULL); // 启 动 定时 器 

} 


在 代码 中 , 函数 GetListCtl0 是 列表 视图 类 中 成 员 函 数 , 其 作用 是 用 于 获取 并 返回 列表 
视图 类 对 象 的 指针 。 该 函数 的 原型 如 下 : 


CListCtrlg GetListCtrl1( ) const; // 获 取 并 返回 列表 视图 类 的 指针 


该 函数 调用 成 功 将 返回 CListCtrl 类 型 的 对 象 指针 。 然 后 ,用户 便 可 以 使 用 该 函数 所 返 
回 的 对 象 指针 调用 CListCtrl 类 的 成 员 函 数 进 行列 表 的 初始 化 .其 运行 效果 如 图 14.38 所 示 。 


小 无 标题 - SasTest 


二 | 消息 内 容 : | 


于 本 
14.38 初始 化 列表 视图 


最 后 ， 用 户 调用 函数 SetTimerO 启 动 定 时 器 ， 定 时 获取 短信 猫 所 返回 的 数据 。 在 该 工 
程 实例 中 , 用 户 将 定时 器 的 时 间 间 隔 设置 为 1000 毫秒 , 表示 程序 将 每 间隔 1 秒 调用 一 次 定 
时 器 消息 响应 函数 。 代 码 如 下 : 


void CSmsTestView: :OnInitialUpdate() // 视 图 类 初始 化 函数 

让 

局 曲 // 省 略 部 分 代码 
SetTimer (1, 1000, NULL); // 启 动 定时 器 

} 


定时 器 启动 之 后 ， 用 户 需要 在 程序 中 定义 定时 器 消息 响应 函数 来 响应 定时 器 消息 。 实 
现 该 消息 响应 函数 的 定义 必须 在 VC 主 界面 中 使 用 快捷 键 Ctl+W 打开 应 用 程序 向 导 对 话 
框 。 在 该 对 话 框 中 ， 可 以 为 工程 视图 类 添加 WM_TIMER 消息 ， 如 图 14.39 所 示 。 
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Class¥izard 


Member Variables | Automation 


Class name: 


ActiveX Events | Class Info | 


SmsTest 


ID_EDIT_COPY 
ID_EDIT_-CUT 


ID_EDIT_-UNDO 


EMSmsTestView.h, EY. ASmsTestYiew.cpp 


ID_EDIT_PASTE 


CSsmsTestView 


Add Class.., 
Add Function 


Delete Function | 


WM_RBUTTONUP 
WM_SETCURSOR 
WM_SETFOCUS 
WM_SHOWWINDOW 
WM_SIZE 

WM _TCARD 


[WM TIMER Sm 


下 Edit Code 


Member functions: 


¥ OnEndPrinting 
¥ oninitialUpdate 
¥ OnpreparePrinting 


MY PreCreateWindow 
Description: 


区 onTimer ON_WM_TIMER 


Indicates timeout interval for a timer has elapsed 


14.39 ”添加 定时 器 消息 响应 函数 


用 户 按照 图 14.39 中 所 示 的 项 目 进行 选择 以 后 ， 单 击 Add Function 按钮 便 可 以 成 功 为 
列表 视图 类 添加 定时 器 消息 响应 函数 OnTimer0。 在 该 函数 中 ， 用 户 可 以 实现 定时 读 取 短 


信 猫 所 返 


void CSmsTestView: :OnTimer (UINT nIDEvent) 


瑟 


的 数据 。 代 码 如 下 : 


if(nIDEvent == 1) 
四 
SM PARAM SmParam; 
Cstring strTime; 
Cstring strNumber; 
Cstring strContent; 
CListCtrlg ListCtrl=GetListCtrl 


// 定 时 器 消息 响应 函数 
// 判 断定 时 器 ID 是 否 为 指定 ID 


// 结 构 体 变量 
// 定 义 字符 串 变量 


0; 


if(theApp.m pSmsTraffic->GetRecvMessage (&SmParam) ) 


{ 
strNumber=SmParam.TPA; 
strContent=SmParam.TP_UD; 


// 获 取 接 收 到 的 短 消息 


// 获 取 短 消息 信息 
// 获 取 短 消息 ID 


strTime = "20" + CString(&SmParam.TP_SCTS[0],2) 


+"-"+CString (&SmParam 

+"-"+CString (&SmParam 

+" "+CString(&SmParam 

+":"+CString (&SmParam 

+":"+CString (&SmPparam 

if(strNumber.Left (2) =="86 
yy 


// 连 接 短 消息 基本 信息 字符 串 
:Tp SETS[21;2) 
.TP SCTS[4],2) 
.TP SCTS[6],2) 
.TP_SCTS[8],2) 
.TP SCTS[10],2); 
中 // 去 掉 短 消息 号 码 前 的 86 


strNumber=strNumber.Mid (2); 


} 


int nItemCount=ListCtrl.GetItemCount () ;// 最 多 保留 200 条 短 消息 


if(nItemCount >=200) 
ListCtrl.DeleteItem(0) 


’ // 删 除 短 消息 
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nItemCount——; // 列 表 索 引 自 减 
} 
ListCtrl.InsertItem(nItemCount，strNumber); // 插 入 新 消息 
ListCtrl.SetItemText (nItemCount, 1, strTime); 
ListCtrl.SetItemText (nItemCount, 2, strContent); 
ListCtrl.EnsureVisible (nItemCount, FALSE); 
1 


else 
CListView: :OnTimer (nIDEvent); // 调 用 基 类 的 定时 器 响应 函数 
全 注意 : 用 户 应 该 将 接收 短信 猫 返 回 数据 的 所 有 操作 ， 均 放 在 函数 OnTimer0 中 进行 实现 。 
这 样 ， 可 以 提高 程序 运行 的 效率 。 
在 本 节 中 ， 主 要 向 用 户 讲解 了 列表 视图 的 初始 化 以 及 定时 读 取 短 信 猫 所 返回 的 数据 等 


编程 方法 。 如 果 用 户 在 学 习 过 程 中 ， 有 不 明白 的 地 方 请 参考 随 书 光盘 中 相应 章节 的 实例 代 
码 进行 参考 。 


4. 添加 发 送 功能 对 话 框 


在 程序 中 ， 用 户 还 应 该 使 其 具有 发 送 AT 指令 等 到 短信 猫 执行 的 功能 。 因 此 ， 在 工程 
中 ， 用 户 首先 需要 添加 一 个 发 送 功能 的 对 话 框 并 在 该 对 话 框 中 放 入 子 控件 等 。 在 该 工程 实 
例 中 ， 将 该 对 话 框 的 名 称 修改 为 IDD_SEND_SM， 如 图 14.40 所 示 。 


ee 


RSS EE 3 


14.40 发送 功 能 对 话 框 


在 程序 启动 时 ， 将 发 送 功能 对 话 框 显示 在 视图 界面 中 。 实 现 这 一 功能 ， 用 户 需 要 将 该 
对 话 框 与 CDialogBar 类 的 对 象 相关 联 。 用 户 在 实例 框架 类 CMainFrame 中 ,定义 CDialogBar 
类 的 对 象 m_wndDialogBar。 代 码 如 下 : 

class CMainFrame : public CFrameWnd // 实 例 框架 类 

{ 


CMainFrame (); 
DECLARE DYNCREATE (CMainFrame) 


protected: 

CstatusBar m wndstatusBar; // 状 态 栏 对 象 

CToolBar  m wndToolBar; // 工 具 栏 对 象 

CDialogBar m wndDialogBar; // 对 话 框 条 对 象 
} 


然后 ， 在 框架 类 CMainFrame 的 创建 函数 OnCreate0 中 ， 关 联 发 送 功能 对 话 框 和 
CDialogBar 类 对 象 。 代 码 如 下 : 


int CMainFrame: :OnCreate (LPCREATESTRUCT lpCreatestruct) 


// 框 架 类 创建 函数 
{ 


if (CErameWnd: :OnCreate (lpCreatestruct)==-1) // 判 断 基 类 创建 函数 执行 情况 
return 17 


if (!m wndToolBar.CreateEx (this, TBSTYLE FLAT, WS CHILD | WS VISIBLE | 
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CBRS_ TOP|CBRS GRIPPER|ICBRS TOOLTIPS|ICBRS FLYBY|ICBRS SIZE DYNAMIC)|| 
!m wndToolBar.LoadToolBar (IDR MAINFRAME)) ”// 创 建 工具 栏 
{ 
TRACEO ("Failed to create toolbar\n"); 
return =17 


} 
if (!m wndstatusBar.Create (this) 11 
!m wndstatusBar.SetIndicators (indicators, 
sizeof (indicators) /sizeof (UINT))) // 创 建 状态 栏 


TRACE0 ("Failed to create status bar\n"); 
return 一 TIx 


} 
if (!m wndDialogBar.Create (this, IDD SEND SM, 
CBRS_ BOTTOMICBRS TOOLTIPSI|ICBRS FLYBY, IDD SEND SM)) 


// 创 建 对 话 框 条 并 关联 指定 对 话 框 


TRACEO ("Failed to create dialog bar\n"); 

return -1; 
} 
ee // 省 略 部 分 代码 

return 07 
在 以 上 代码 中 ， 实 现 关 联 操作 的 代码 是 “m_wndDialogBar.Create(this, IDD_SEND_SM., 

CBRS_BOTTOMICBRS_TOOLTIPS|ICBRS_FLYBY, IDD_SEND_SM)”。 当 这 段 代 码 执行 成 
功 以 后 ， 用 户 将 在 程序 运行 效果 中 看 到 发 送 功能 的 对 话 框 。 如 果 代码 执行 失败 ， 程 序 将 在 
编译 器 输出 窗口 中 输出 信息 Failed to create dialog bar， 如 图 14.41 所 示 。 


二 | 消息 内 容 : | 


图 14.41 为 程序 添加 发 送 功能 对 话 框 
由 于 本 节 中 ， 仅 向 用 户 讲解 如 何 进行 程序 界面 设计 步骤 以 及 实现 方法 等 。 所 以 ， 关 于 
发 送 功能 的 讲解 将 在 14.6.2 节 中 向 用 户 进行 讲解 。 
14.6.2 ”发 送 短信 


在 本 章 实例 程序 中 , 主要 的 发 送 功能 都 是 在 “发 送 ”按钮 的 消息 响应 函数 中 进行 实现 。 
其 实现 原理 是 首先 从 控件 中 获取 用 户 输入 的 信息 。 如 果 用 户 所 输入 的 信息 为 空 ， 则 应 该 提 
示 用 户 该 信息 不 能 为 空 。 代 码 如 下 : 
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a // 省 略 部 分 代码 
CComboBox* pNumberWnd= (CComboBox*)m wndDialogBar.GetDlgItem(IDC NUMBER) 


CComboBox* pContentWnd= (CComboBox*)m wndDialogBar.GetDlgItem(IDC CONTEN 


了) 7 
// 获 取 编 辑 框 的 对 象 指针 
CString strNumber; // 定 义 变量 
Cstring strContent; 
pNumberWnd->GetWindowText (strNumber); // 获 取 用 户 输入 的 号 码 


pContentWnd->GetWindowText (strContent);  ”// 获 取 用 户 输入 的 信息 
if (strNumber==NULL) 
{ 
MessageBox (" 短 消息 中 心服 务 号 码 或 对 方 号 码 不 能 为 空 ! ") ; 
// 提 示 用 户 
下 


else 
‘ 
if(strContent==NULL) 


MessageBox (" 短 消息 数据 信息 不 能 为 空 ! ") ; 。 // 提 示 用 户 
1 


else 


{ 


{ 


// 进 行 相关 数据 的 处 理 
} 
在 代码 中 ， 用 户 为 了 安全 的 进行 数据 传输 或 接收 ， 则 应 该 首先 检测 用 户 输入 的 数据 的 
然后 ， 用 户 检测 完 数据 的 正确 性 以 后 ， 便 可 以 对 这 些 信息 进行 处 理 或 发 送 到 短信 猫 进 
行 处 理 。 代 码 如 下 : 


void CMainFrame: :Onsend() // 发 送 按钮 消息 响应 函数 
CComboBox* pNumberWnd= (CComboBox*)m wndDialogBar.GetDlgItem(IDC NUMBER); 
CComboBox*# 
pContentWnd= (CComboBox*)m wndDialogBar.GetDlgItem(IDC CONTENT); 
// 获 取 编 辑 框 的 对 象 指针 
CString strsmsc; // 定 义 变量 
Cstring strNumber; 
CString strContent; 
strsmsc=theApp.m strsmsc; // 获 取 短 消息 类 的 实例 对 象 
pNumberWnd->GetWindowText (strNumber) 7 // 获 取 用 户 输入 的 号 码 
PContentWnd->GetWindowText (strContent); // 获 取 用 户 输入 的 信息 
if(strNumber.GetLength() < 11) // 检 查 号 码 的 合法 性 
{ 
AfxMessageBox ("请 输入 正确 的 号 码 ! ") ; // 提 示 用 户 重新 输入 号 码 
pNumberWnd->SetFocus (); // 设 置 编 辑 框 焦点 
pNumberWnd->SetEditsel (-1, 0); // 设 置 组 合 框 的 当前 位 置 
return; 
| 
CString strUnicode; // 检 查 短 消息 内 容 是 否 空 或 者 超 长 


WCHAR wchar [1024]7 
int nCount = : :MultiByteToWideChar (CP_ACP, 0, strContent, -1, wchar, 1024); 


if (nCount <= 1) // 如 果 为 空 
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AfxMessageBozx (" 请 输入 消息 内 容 ! ") ; // 提 示 用 户 
pContentWnd->SetFocus (); // 设 置 编辑 框 焦点 
pContentWnd->setEditsel (-1, 0); // 设 置 组 合 框 当前 位 置 
return; // 返 回 空 
} 
else 
{ 
if (ncount > 70) // 将 所 有 数据 用 UCS2 编码 ， 最 大 


/1/70 个 字符 半角/ 全角) 


AfxMessageBox ("消息 内 容 太 长 ， 无 法 发 送 ! "); // 提 示 用 户 
pContentWnd->SetFocus (); 
pContentWnd->SetEditsel(-1, 0); 
return ; 
} 
} 
if (AfxMessageBox ("确定 发 送 吗 ?", MB_YESNO) ==IDYES) // 是 否 发 送 
| 


SM PARAM SmParamy // 结 构 体 SM_PARAM 变量 
memset (&SmParam，0，sizeof (SM_PARAM) ); ”// 初 始 化 缓冲 区 
if(strSmsc[0] == '+') 


{ 


strsmsc = strSmsc.Mid(1) 7 


} 
if(strNumber [0]=="'+"') 
{ 
strNumber=strNumber .Mid(1); // 去 掉 号 码 前 的 + 
} 
if(strsmsc.Left (2) !="86") 
{ 
strsmsc="86"+strSmsc; // 在 号 码 前 加 86 
} 
if(strNumber.Left(2) !="86") 
{ 
strNumber="86"+strNumber; 
} 
strcpy (SmParam.SCRA，StrSmsc) 7 // 初 始 化 短 消 息 结构 
strcpy (SmParam.TPA, strNumber); 
strcpy (SmParam.TP UD, strContent); 
SmParam.TP PID=0; 
SmParam.TP_ DCS=GSM UCS2; 
theApp.m psmsTraffic->PutSendMessage (&SmParam) ; // 发 送 短 消息 
if (pNumberWnd->FindstringExact (-1, strNumber)<0) // 在 列表 中 加 入 新 字符 
串 
{ 
pNumberWnd->Insertstring(0, strNumber); 
} 
if(pContentWnd->FindstringExact (-1, strContent)<0) 
PContentWnd->InsertString(0， strContent) 
} 
} 


pContentWnd->SetFocus (); // 设 置 编 辑 框 焦点 
pContentWwnd->setEditsel (-1, 0); // 设 置 组 合 框 的 当前 位 置 


} 
用 户 通 过 上 面 的 代码 ， 实 现 了 程序 通过 制定 端口 发 送 指令 等 信息 到 短信 猫 ， 并 由 短信 


»447* 


第 3 篇 Visual C++ 串口 通信 


猫 执 行 相关 指令 将 信息 发 送 到 目的 号 码 手机 中 。 首 先 ， 用 户 在 目标 号 码 中 输入 信息 接收 号 
码 ， 在 消息 内 容 中 ， 输 入 将 要 发 送 的 短信 内 容 。 然 后 ， 单 击 “ 发 送 ”按钮 即 可 ， 如 图 14.42 
所 示 。 


文件 人 句 辑 如 查看 WD 帮助 中 
DBHY SERS 
号 码 时 间 


目标 号 码 : 13171605132 ”之 ] 栖息 内 容 : 天 网 上 出 条 忠 斋 ， 疗 圳 了 
就 结 


图 14.42 发 送 手 机 短 消息 


全 注意 : 如 果 用 户 需 要 在 发 送 指令 或 信息 时 ， 为 程序 添加 其 他 功能 ， 则 可 以 参考 随 书 光盘 
中 的 相应 章节 内 容 的 实例 代码 进行 添加 或 改写 即 可 。 


14.6.3 ”接收 短信 


对 于 本 章 实 例 工程 而 言 ， 实 现 短 消息 的 接收 功能 也 是 非常 重要 的 一 部 分 。 所 以 ， 本 节 
将 向 用 户 介绍 通过 短信 猫 实现 短 消息 数据 接收 的 编程 方法 。 

1. 短 消息 接收 步骤 

首先 ， 当 短信 猫 接收 到 对 方 发 送 的 短 消息 后 ， 用 户 需 要 从 短信 猎 中 读 取 该 短 消息 的 数 
据 。 在 前 面 的 章节 中 ， 曾 向 用 户 介绍 过 短信 猫 的 相关 AT 指令 的 用 法 。 因 此 ， 在 这 里 实现 
从 短信 猫 中 读 取 短 消息 时 ， 用 户 可 以 使 用 AT 指令 AT+CMGR 对 短 消息 进行 读 取 。 在 本 章 
中 ， 用 户 可 以 使 用 前 面 所 封装 的 串口 操作 函数 ReadCommO 进 行 短 消息 读 取 ， 代 码 如 下 : 


E // 省 略 部 分 代码 
CString str; // 定 义 命令 字符 串 变 量 
char buffer[1024]={0}; // 定 义 数据 缓冲 区 
Str="RT+CMGR" 7 // 初 始 化 命令 字符 串 


int i=WriteComm(str.GetBuffer(0),str.GetLength () ) ; // 通 过 串口 向 短信 猫 写 入 命 
令 字符 串 


if (i!=0) 
{ 
MessageBox ("接收 命令 发 送 成 功 ， 正 在 接收 短 消息 ! ") ; // 提 示 用 户 
ReadComm (buffer,1024) 7 // 通 过 串口 向 短信 猫 读 取 短 信息 
} 
else 


MessageBox ("接收 命令 发 送 失 败 ! 请 重 试 ! ") ; 
} 
Ss // 省 略 部 分 代码 
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然后 ， 用 户 再 将 读 取 到 的 短 消 息 内 容 显示 出 来 即 可 。 代 码 如 下 : 


Se // 省 略 部 分 代码 
Cstring strl; // 定 义 字符 串 变量 
strl.Format ("%s",buffer); // 格 式 化 短 消息 
MessageBox (str1); // 显 示 消息 框 

// 省 略 部 分 代码 


2. 短 消息 接收 函数 

在 实例 中 ， 短 消息 的 接收 功能 已 经 被 封装 在 指定 函数 中 。 而 由 于 实例 程序 必须 定时 查 
询 短 信 猫 中 是 否 有 新 的 短 消息 到 来 ， 所 以 ， 用 户 需 要 将 短 消息 的 接收 功能 在 定时 器 消息 
WM_TIMER 的 消息 响应 函数 中 进行 实现 。 代 码 如 下 : 


void CSmsTestView: :OnTimer (UINT nIDEvent) // 定 时 器 消息 响应 函数 
if(nIDEvent ==2) // 判 断定 时 器 ID 是 否 为 指定 ID 
{ 
Cstring str; // 定 义 命令 字符 串 变量 
Cstring strl; // 定 义 字符 串 变 量 
char buffer[1024]={0}; // 定 义 数据 缓冲 区 
str="AT+CMGR”; // 初 始 化 命令 字符 串 
int i=WriteComm(str.GetBuffer(0),str.GetLength()); 

// 通 过 串口 向 短信 猫 写 入 命令 字符 串 

if(i!=0) 


{ 
MessageBox ("接收 命令 发 送 成 功 ， 正 在 接收 短 消息 ! ") ; ”// 提 示 用 户 
ReadComm (buffer, 1024); // 通 过 串口 向 短信 猫 读 取 短 消息 


} 


else 


{ 
MessageBox ("接收 命令 发 送 失败 ! 请 重 试 ! "); 
: 


strl.Format ("%s",buffer); // 格 式 化 短 消息 
MessageBox (str1); // 显 示 消息 框 
} 
else 
{ 
CListView: :OnTimer (nIDEvent); // 调 用 基 类 的 定时 器 响应 函数 


} 
} 
名 注意: 用 户 实际 编程 时 ， 一 定 要 注意 启动 定时 器 之 前 需要 指定 一 个 定时 器 的 ID， 并 且 这 
个 ID 不 能 重复 使 用 。 例 如 ， 在 上 面 的 代码 中 ， 将 定时 器 ID 假设 为 2， 是 因为 在 
前 面 的 代码 中 已 经 将 ID 为 1 的 定时 器 使 用 了 。 所 以 ， 为 了 区 别 ， 这 里 将 定时 器 
ID 设置 为 2。 
在 本 节 中 ， 主 要 讲解 了 创建 实例 工程 与 其 界面 的 方法 ， 并 举例 讲解 了 通过 短信 猫 实现 
短 消息 发 送 以 及 接收 的 编程 方法 。 在 学 习 理论 知识 的 同时 ， 建 议 用 户 结合 随 书 光盘 中 的 实 
例 代码 进行 ， 将 达到 更 好 的 学 习 效 果 。 
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14.6.4 ”实现 实例 托盘 程序 

为 了 使 实例 程序 更 加 人 性 化 。 所 以 ， 本 章 实例 程序 中 加 入 了 托盘 程序 的 基本 功能 。 本 
节 将 向 用 户主 要 讲解 在 Windows 操作 系统 下 ， 实 现实 例 程序 的 托盘 编程 等 相关 知识 。 

1. 托盘 程序 介绍 


托盘 程序 是 指 当 程序 最 小 化 或 者 程序 线程 挂 起 时 ， 该 程序 将 以 图 标的 形式 显示 在 系统 
界面 的 任务 条 右 端 。 该 位 置 也 就 是 用 户 计算 机 上 显示 时 间 的 那 块 区 域 ， 如 图 14.43 所 示 。 


图 14.43 系统 托盘 程序 


用 户 在 图 14.43 中 ， 可 以 看 见 笔者 机 器 上 当前 的 所 有 托盘 程序 均 以 图 标的 方式 进行 显 
示 的 。 当 用 户 需要 将 该 程序 激活 时 ， 只 需要 使 用 鼠标 双击 相应 的 程序 图 标 即 可 实现 激活 程 


外 注意 : Windows 系统 下 ， 托 盘 程序 处 于 非 活动 状态 。 


2. 托盘 编程 相关 函数 


在 Windows 编程 中 ， 实 现 程 序 托盘 化 的 API 函数 是 Shell NotifyIcon0， 其 函数 原型 
如 下 : 
WINSHELLAPI BOOL WINAPI Shell NotifyIcon( 
DWORD dwMessage, 
PNOTIFYICONDATA pnid 
); 
如 果 该 函数 执行 成 功 ， 则 返回 tme。 和 否则 ， 函 数 将 返回 false 。 其 参数 意义 分 别 
如 下 : 
口 参数 dwMessage 表示 用 户 将 要 执行 的 操作 类 型 。 例 如 ， 添 加 、 删 除 或 修改 图 标 。 
其 取 值 如 表 14.2 所 示 。 


表 14.2 参数 dwMessage 取 值 


参数 dwMessage 取 值 含义 表示 
NIM ADD 添加 图 标 
NIM DELETE 删除 图 标 
NIM MODIFY 修改 图 标 


口 参数 pnid 是 指向 与 托盘 信息 相关 的 结构 体 NOTIFYICONDATA 变量 ,一 般 情况 下 ， 
用 户 需 要 定义 并 初始 化 该 结构 体 变量 以 后 ， 才 能 成 功 调用 该 函数 。 结 构 体 
NOTIFYICONDATA 定义 如 下 : 


typedef struct NOTIFYICONDATA { 
DWORD cbsize; // 该 结构 体 长 度 
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HWND hwndy // 进 行 消息 处 理 的 窗口 句柄 
UINT uID; // 图 标 ID 

UINT uFlags; // 标 识 其 哪些 成 员 变量 有 效 
UINT uCallbackMessage; // 自 定义 托盘 消息 

HICON hIcon; // 图 标 句柄 

char szTip[64]; / /程序 托盘 时 显示 的 文字 


} NOTIFYICONDATA, *PNOTIFYICONDATA; 


例如 ， 用 户 将 程序 实例 实现 托盘 化 。 代 码 如 下 : 


Se // 省 略 部 分 代码 
NOTIFYICONDATA nid; // 定 义 结构 体 变量 
nid.cbsize = (DWORD) sizeof (NOTIFYICONDATA); // 初 始 化 结构 体 中 的 各 个 成 员 变 量 
nid.hwnd = this->m hWnd; 
nid.uID = IDR MAINFRAME; 
nid.uFlags = NIF ICON | NIF MESSAGE | NIF TIP ; 


nid.uCallbackMessage = WM SHOWTASK; // 自 定义 的 消息 

nid.hIcon=LoadIcon (AfxGetInstanceHandle () MAKEINTRESOURCE (IDR MAINF 
RAME)); 

strcpy (nid.szTip,，" 计 划 任 务 提醒 ") ; // 信 息 提 示 条 为 "计划 任务 提醒 " 

Shell NotifyIcon (NIM ADD, gnid); // 在 托盘 区 添加 图 标 

this->ShowWindow (SW_HIDE); // 隐 藏 主 窗口 


在 程序 中 ， 用 户 首先 定义 了 结构 体 NOTIFYICONDATA 变量 nid。 然 后 ， 再 对 其 中 的 
成 员 变 量 进行 初始 化 。 最 后 ， 调 用 函数 Shell NotifyIcon0 实 现 托盘 功能 。 其 中 ， 程 序 托盘 
时 ， 当 用 户 将 鼠标 移动 到 其 图 标 位 置 时 ， 会 显示 “计划 任务 提 
醒 ”， 如 图 14.44 所 示 。 
各 注意 : 在 Windows 系统 中 ,用户 实现 托盘 程序 只 需要 使 用 函 
数 Shell NotifyIcon0 即 可 以 实现 。 


3. 程序 实例 托盘 化 


前 面 两 节 已 经 向 用 户 讲解 了 实现 托盘 程序 的 相关 方法 。 所 以 ， 在 本 节 中 将 向 用 户 讲解 
在 本 章 实例 程序 中 ， 如 何 编写 添加 托盘 程序 的 相关 代码 等 。 

首先 ， 用 户 需 要 在 本 章 实例 程序 中 定义 一 个 自 定义 的 消息 ， 并 将 其 名 称 修改 为 
WM_SHOWTASK。 代 码 如 下 : 


#define WM SHOWTASK WM USER+100 // 定 义 自 定义 消息 


自 定义 消息 定义 成 功 后 ， 在 实例 程序 的 框架 类 CMainFrame 中 定义 消息 
WM_SHOWTASK 的 消息 响应 函数 。 代 码 如 下 : 


class CMainFrame : public CFrameWnd // 框 架 类 
| 
protected: 
CMainFrame (); 
DECLARE DYNCREATE (CMainFrame) 
LRESULT onShowTask (WPARAM wParam, LPARAM lParam) ; // 声 明 消 息 响应 函数 
1 


"国务 ZE 


14.44 ”显示 提示 文本 


es // 省 略 部 分 代码 
IMPLEMENT DYNCREATE (CMainFrame, CFrameWnd) 
BEGIN MESSAGE MAP (CMainFrame, CFrameWnd) 
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//{{AFX MSG MAP (CMainFrame) 
ON MESSAGE (WM SHOWTASK, onShowTask) // 添 加 消息 映射 
//}}AFX MSG MRP 
END MESSAGE MRP () 
// 省 略 部 分 代码 


然后 ， 在 程序 调用 函数 Shell NotifyIcon0 实 现 托盘 功能 。 由 于 在 本 章 实例 中 ， 是 将 托 
盘 功能 实现 在 程序 启动 时 。 所 以 ， 用 户 在 函数 CMainFrame::OnCreate0 中 需要 添加 代码 
如 下 : 


int CMainFrame::OnCreate (LPCREATESTRUCT lpCreatestruct) 
上 
if (CFrameWnd::OnCreate(lpCreatestruct) == -1) 
return -1; 
NOTIFYICONDATA nid; // 定 义 结构 体 变量 
nid.cbsize = (DWORD) sizeof (NOTIFYICONDATA);  // 初 始 化 结构 体 中 的 各 个 成 员 变 量 
nid.hWnd = this->m hWnd; 
nid.uID = IDR MAINFRAME; 
nid.uFlags = NIF ICON | NIF MESSAGE | NIF TIP 7 
nid.uCallbackMessage = WM SHOWTASK; // 自 定义 的 消息 
nid.hIcon=LoadIcon (AfxGetInstanceHandle(), 
MAKEINTRESOURCE (IDR_ MAINFRAME)); 


strcpy (nid.szTip,， "计划 任务 提醒 ") ; // 信 息 提 示 条 为 计划 任务 提醒 
Shell NotifyIcon (NIM ADD, gnid); // 在 托盘 区 添加 图 标 
this->ShowWindow (SW HIDE); // 隐 藏 主 窗口 

return 07 


用 户 将 上 面 的 程序 编译 、 运 行 后 ， 会 看 到 当 实 例 程序 启动 时 ， 该 程序 便 已 经 实现 了 托 
盘 化 。 并 且 在 任务 栏 的 右 端 添 加 了 该 实例 程序 的 图 标 。 那 么 ， 此 时 用 户 使 用 鼠标 在 该 图 标 
上 进行 操作 ， 会 发 现实 例 程序 并 没有 任何 反应 。 这 是 因为 用 户 在 程序 中 ， 并 没有 为 其 相应 
的 操作 功能 编写 相应 的 代码 。 

最 后 ， 用 户 还 要 为 自 定义 的 托盘 消息 WM_SHOWTASK 实现 其 消息 响应 函数 。 代 码 
如 下 : 


LRESULT CMainFrame: :onShowTask (WPARAM wParam,LPARAM lParam) 


{ 


if (wParam==IDR MAINFRAME) //wParam 接收 的 是 图 标的 ID 
return 1; 
switch (lParam) //1Param 接收 的 是 鼠标 的 行为 
| 
case WM RBUTTONUP: // 右 键 起 来 时 弹出 快捷 菜单 ， 这 里 只 有 一 个 关闭 
{ 
LPPOINT lpoint = new tagPOINT; ”// 定 义 并 初始 化 点 结构 
: :GetCursorPos (lpoint); // 得 到 鼠标 位 置 
CMenu menu; // 定 义 菜单 对 象 
menu.CreatePopupMenu () // 创 建 一 个 弹出 式 菜单 


menu.AppendMenu (MEF_ STRING，WM _DESTROY, "关闭 ") ; // 在 弹出 式 菜单 中 添加 关闭 菜单 
menu.TrackPopupMenu (TPM LEFTALIGN, lpoint->x, lpoint->y, 


this); // 确 定 弹出 式 菜单 的 位 置 
HMENU hmenu = menu.Detach(); // 资 源 回收 
menu-DestroyMenu () // 销 毁 菜 单 对 象 
delete lpoint; // 删 除 点 结构 体 变量 
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} 


break; 
case WM LBUTTONDBLCLK: // 双 击 左 键 的 处 理 
{ 
this->ShowWindow (SW SHOW); 
// 显 示 主 窗口 
} 
break; 
return 0; 


上) 
} 
全 注 意 : 上 面 的 程序 中 ， 仅 编写 了 部 分 基本 功能 的 代码 。 如 果 用 户 需要 为 程序 添加 其 他 功 
能 ， 则 可 以 通过 修改 代码 实现 。 


用 户 通过 以 上 几 个 步骤 ， 便 完成 了 托盘 程序 的 基本 功能 等 代码 的 编写 ， 其 完整 的 功能 
代码 请 用 户 参考 随 书 光 盘 中 本 小 节 的 相关 代码 。 所 以 ， 在 这 里 将 不 再 进行 讲述 。 


14.7 相关 代码 分 析 


用 户 通过 对 本 章 前 几 个 小 节 的 学 习 ， 已 经 对 使 用 VC 编程 实现 通过 短信 猫 发 送 手 机 短 
消息 的 方法 有 了 进一步 地 了 解 和 掌握 。 但 是 ， 用 户 可 能 对 其 中 的 某 些 编程 方式 或 者 方法 并 
没有 学 习 得 非常 透彻 。 因 此 ， 本 节 将 专门 向 用 户 详细 讲解 本 章 中 的 一 些 关键 代码 段 或 编程 
思想 。 


14.7.1 参数 设置 对 话 框 代 码 分 析 


在 本 章 前 面 的 相关 章节 中 ， 已 经 向 用 户 详细 讲解 了 参数 设置 对 话 框 的 初始 化 等 相关 编 
程 方法 。 但 是 ， 这 些 方法 中 并 没有 对 该 对 话 框 中 “确定 ”和 “放弃 ”按钮 的 消息 响应 函数 
进行 讲解 。 那 么 ， 在 本 节 中 将 向 用 户 补充 讲解 这 部 分 的 相关 内 容 。 

1. 设置 对 话 框 界面 优化 


用 户 为 了 使 程序 界面 具有 较 高 的 交互 性 ， 可 以 在 参数 设置 对 话 框 中 添加 一 个 图 像 控 
件 。 在 本 章 实例 中 ， 将 该 控件 的 名 称 修改 为 IDC_STATIC， 并 将 其 类 型 设置 为 “图 标 ”， 
如 图 14.45 所 示 。 


加 里 常规 | 样式 | 扩展 样式 | 
[oc stanid 了 可 类 型 mM: | 图 标 习 


F 可 见 国 三 组 (@] 图 像 IMj: JiDLSETTINGS -| 


三 已 闲 用 三 制 表 站 四 sa [一 一 一 一 
厂 帮助 ID[H] Sy 


图 14.45 ”修改 图 像 控件 的 各 个 参数 


Mie 
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如 果 控 件 参数 修改 完成 之 后 ， 用 户 便 可 以 选择 将 被 现实 的 图 标 ID 了 。 在 实例 程序 中 ， 
为 了 向 用 户 更 好 地 讲解 这 部 分 知识 。 所 以 , 在 该 实例 中 添加 的 图 标 资源 为 前 面 所 使 用 的 QQ 
图 标 , 如 图 14.45 所 示 , 用 户 仅 需要 将 已 插入 的 图 标 资源 ID 修改 为 IDL SETTINGS 即 可 完 
成 图 标 显示 功能 。 最 终 显 示 图 标的 界面 效果 如 图 14.46 


业 示 。 端口 与 SESC 设 置 区 
人 注意; 用 户 修改 界面 中 的 图 标 显示 时 ， 使 用 以 上 方法 | 
实现 起 来 是 非常 简单 可 行 的 。 rE 

2. “确定 ”按钮 响应 函数 oy | 


当 用 户 将 程序 所 需 的 参数 设置 好 以 后 ， 单 击 确定 按 “加 14 46 显示 图 标 后 的 对 话 框 效果 
钮 便 可 以 使 这 些 设置 生效 。 因 此 ， 实 现 确定 按钮 的 消息 
响应 函数 也 非常 重要 。 该 函数 的 实现 代码 如 下 : 


void CSettingsD1g: :OnOK () // 确 定 按钮 消息 响应 函数 
人 
UpdateData() // 获 取 控 件 变量 值 
int nsel; // 定 义 整 型 变量 
nsel=m ctrlCommList.GetCursel (); // 获 取 列表 控件 的 选择 项 索引 
if (nsel>-1) // 若 用 户 进行 了 选择 
m_ctrlCommList .GetLBText (nSel,m_strPort); // 则 获取 用 户 选择 索引 处 的 项 目 
文字 
nsel=m ctrlRateList.GetCursel (); // 获 取 用 户 选择 的 通信 速率 
if(nSel>-1) // 如 果 用 户 选择 的 项 目 索引 正确 


{ 
m ctrlRateList.GetLBText (nSel,m_strRate) ; // 获 取 通信 速率 值 


} 


else // 如 果 用 户 选择 出 错 
{ 
if (m strPort.IsEmpty() | Im strRate.IsEmpty() ||m strSmsc.IsEmpty()) 
// 最 后 再 判断 用 户 输入 的 值 是 否 为 
E 
{ 
AfxMessageBox ("请 正确 设置 端口 和 SMSC!"); // 弹 出 消息 框 显示 错误 信息 
return; // 返 回 空 值 
} 
1 
CDialog::OnOK() // 调 用 基 类 的 相应 函数 


1 
在 代码 中 , 变量 m_strRate 与 m_strPort 均 为 实例 程序 的 全 局 变量 , 用 户 可 以 通过 MFC 
应 用 程序 向 导 为 相应 的 控件 添加 变量 。 如 果 用 户 对 这 方面 的 内 容 不 熟悉 ， 请 复习 前 面相 应 
章节 中 的 内 容 。 
各 注意 : 当 程 序 执行 完 这 段 代码 以 后 ， 程 序 会 获取 到 用 户 所 选择 或 输入 的 相关 参数 ， 并 将 
这 些 参数 保存 在 相应 的 变量 中 。 
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3. “放弃 ”按钮 响应 函数 


用 户 在 该 按钮 的 消息 响应 函数 中 ， 可 以 有 两 种 功能 。 一 种 当 用 户 单 击 该 按钮 后 ， 程 序 
自动 退出 。 另 外 一 种 是 当 用 户 单 击 该 按钮 后 ， 程 序 会 将 用 户 所 输入 的 参数 全 部 清空 或 恢复 
初始 值 。 

如 果 用 户 在 单 击 “ 放 弃 ” 按 钮 后 ， 希 望 程 序 自动 退出 ， 则 代码 如 下 ; 


void CSettingsD1g: :OnCancel() // 放 弃 按钮 消息 响应 函数 


::SendMessage (GetParent ()->m_hWnd,WM CLOSE,0,0); // 向 父 窗口 发 送 关闭 消息 
CDialog: :OnCancel (); 
用 户 可 以 试 着 编译 以 上 代码 ， 编 译 成 功 后 并 运行 实例 程序 。 但 是 当 用 户 单 击 “ 放 弃 ” 
按钮 后 ， 实 例 程序 虽然 退出 了 ,但 是 系统 却 弹 出 了 错误 对 话 框 ， 如 图 14.47 所 示 。 


Hicrosoft Yisual C++ Debug Library 


Debug Assertion Failed! 


Progran;. .， 巡 殉 煞 3 嫉 辽 荡 2004081413284621295\SnsTest\Debug\SnsTest. exe 
Fle: dlgeore. cpp 
ne 


For information on how your program can cause an assertion 
failure, see the Visual C++ documentation on asserts. 


(Press Retry to debug the application) 


EEER i | No 


图 14.47 系统 弹出 错误 对 话 框 


为 什么 程序 在 退出 时 ， 系 统 会 弹出 如 图 14.47 所 示 的 错误 对 话 框 ?” 这 是 因为 函数 
SendMessage0 的 工作 机 制 是 基于 同步 模式 的 。 也 就 是 指 当 该 函数 将 指定 消息 发 送出 去 后 ， 
发 送 线程 会 等 待 其 返回 结果 。 在 该 实例 中 ， 由 于 发 送 线程 是 实例 中 的 一 个 子 窗口 函数 。 所 
以 ， 当 函数 SendMessage0 返 回 时 ， 该 窗口 已 经 被 迫 退 出 并 无 法 接收 其 返回 的 数据 ， 因 而 造 
成 错误 。 如 果 用 户 稍稍 修改 一 下 代码 ， 可 以 避免 该 错误 的 发 生 。 修 改 后 的 代码 如 下 : 


void CSettingsD1g: :OnCancel() // 放 弃 按 钮 消息 响应 函数 
{ 


::PostMessage (GetParent () ->m_hWnd,WM_CLOSE, 0,0); // 向 父 窗口 发 送 关 闭 消息 

CDialog: :OnCancel (); 

} 

用 户 可 以 编译 并 运行 以 上 程序 ， 按 照 前 面相 同 的 步骤 进行 操作 ， 在 关闭 程序 后 ， 系 统 
并 没有 弹出 任何 错误 对 话 框 。 这 是 因为 函数 PostMessageO 使 用 的 工作 原理 是 基于 异步 模式 
的 。 也 就 是 说 当 对 话 框 通过 该 函数 将 关闭 消息 发 送 到 实例 程序 的 消息 队列 以 后 ， 会 立即 返 
回 ， 避 免 了 造成 程序 的 不 确定 性 。 


各 注意 : 用 户 在 使 用 函数 PostMessage 0 和 SendMessage0 时 ， 一 定 需要 了 解 其 工作 原理 。 
这 样 ， 用 户 在 使 用 时 ， 会 使 程序 的 运行 效率 提高 很 多 。 
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14.7.2 ”发 送 功能 代码 分 析 


实例 程序 通过 短信 猫 将 短 消息 发 送出 去 时 ， 用 户 需要 特别 注意 一 些 字符 的 判断 或 者 转 
换 。 和 否则 ， 短 消息 接收 方 所 接收 到 的 短 消 息 可 能 出 现 无 法 显示 等 错误 。 首 先 ， 用 户 应 该 判 
断 输入 的 号 码 或 信息 是 否 正 确 合法 。 代 码 如 下 : 


// 省 略 部 分 代码 
if(strNumber.GetLength() < 11) // 检 查 号 码 的 合法 性 
{ 
AfxMessageBox ("请 输入 正确 的 号 码 ! "); // 提 示 用 户 重新 输入 号 码 
pNumberWnd->SetFocus (); / /设置 编 辑 框 焦点 
pNumberWnd->SetEditsel (-1, 0); // 设 置 组 合 框 的 当前 位 置 
return; 
} 
Cstring strUnicode; // 检 查 短 消息 内 容 是 否 空 或 者 超 长 
WCHAR wchar[1024]; 
int nCount = :;:MultiByteToWideChar (CP ACP, 0, strContent, -1, wchar, 
1024); 
if (nCount <= 1) // 如 果 为 空 
{ 
AfxMessageBox ("请 输入 消息 内 容 ! ") 7 // 提 示 用 户 
pContentWnd->SetFocus (); // 设 置 编辑 框 焦点 
pContentWnd->SsetEditsel (-1, 0); // 设 置 组 合 框 当前 位 置 
return; // 返 回 空 
} 
else 
if(nCount > 70) // 将 所 有 数据 用 UCS2 编码 ， 最 大 
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} 


/170 个 字符 (半角 /全 角 》 


AfxMessageBox ("消息 内 容 太 长 ， 无 法 发 送 ! ") ; / /提示 用 户 
pContentWnd->SetFocus () 7 
pContentWnd->SetEditsel(-1, 0); 

Feturn 7 


if (AfxMessageBox (" 确 定 发 送 吗 ? ",MB_YESNO) ==IDYES) // 是 否 发 送 


{ 


SM PARAM SmParamy // 结 构 体 SM PARAM 变量 
memset (5SmParam，0，sizeof (SM_PARAM) ) ; // 初 始 化 缓冲 区 
if(strsmsc[0] == '+') 


strsmsc = strsmsc.Mid(1); 
} 
if(strNumber [0]=="'+') 
{ 
strNumber=strNumber.Mid(1); // 去 掉 号 码 前 的 + 


} 
if(strsmsc.Left (2) !="86") 
4 
strsmsc="86"+strSmsc; // 在 号 码 前 加 86 
} 
if(strNumber.Left (2) !="86") 
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strNumber="86"+strNumber; 
下 
// 省 略 部 分 代码 
在 上 面 的 代码 中 ， 用 户 首先 判断 了 所 输入 的 手机 号 码 与 短 消息 内 容 的 正确 性 和 合法 
性 。 如 果 这 些 信息 为 空 或 者 非法 ， 则 程序 会 弹出 错误 提示 对 话 框 。 
然后 ， 用 户 通过 对 输入 的 信息 进行 验证 后 ， 便 可 以 将 短 消息 通过 短信 猫 进 行 发 送 了 。 
代码 如 下 : 


// 省 略 部 分 代码 
theApp.m pSmsTraffic->PutSendMessage (&SmParam) 7 // 发 送 短 消息 
if(pNumberWnd->FindstringExact (-1, strNumber) <0) // 在 列表 中 加 入 新 字符 串 


{ 
pNumberWnd->Insertstring(0, strNumber); 


i 

if(pContentWnd->FindstringExact (-1, strContent)<0) 
L 
pContentWwnd->Insertstring(0, strContent); 
} 
// 省 略 部 分 代码 
在 代码 中 ， 短 消息 通过 封装 的 自 定义 函数 PutSendMessage0 发 送出 去 ， 并 且 将 发 送出 
去 的 短 消息 内 容 再 显示 到 本 地 程序 的 列表 中 。 


外 注意 : 函数 PutSendMessage() 的 相关 定义 以 及 作用 ,请 用 户 参 考 14.5.3 节 中 的 相关 内 容 。 
14.7.3 ”接收 功能 代码 分 析 
用 户 接 收 短 消息 是 通过 定时 读 取 程序 串口 的 数据 缓冲 区 获取 的 。 在 接收 短 消 息 时 ， 最 


重要 的 一 步 是 判断 数据 的 完整 性 和 正确 性 。 首先， 用 户 应 该 获取 短 消息 的 相关 信息 。 例如， 
短 消息 发 送 方 的 号 码 等 。 代 码 如 下 : 


ee // 省 略 部 分 代码 
if (theApp .m_PSmsTraffic->GetRecVMessage (&SmParam) ) 
// 获 取 接 收 到 的 短 消息 
{ 

strNumber=SmParam.TPR7 // 获 取 短 消息 信息 

strContent=SmParam.TP_UD; // 获 取 短 消息 ID 

strTime = "20" + CString(&SmParam.TP_ SCTS[0],2) 
// 连 接 短 消息 基本 信息 字符 

串 


+"-"+CString (&Smparam.TP_ SCTS[2],2) 
+"-"+CString (gSmParam.TP SCTS [4] ,2) 
+" "+CString(&SmParam.TP_SCTS[6] ,2) 
+n:n+CString(&SmParam.TBP SCTS [8] ,2) 
+":"+CString(&SmParam.TP SCTS[10],2); 

// 省 略 部 分 代码 


通过 上 面 的 代码 ， 用 户 获取 了 短 消 息 发 送 方 的 号 码 及 其 短 消 息 内 容 。 接 下 来 ， 用 户 就 
需要 对 这 些 接收 到 的 数据 进行 重组 ， 使 其 结构 到 达 最 简 。 代 码 如 下 : 
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// 省 略 部 分 代码 
if(strNumber.Left (2) =="86") // 去 掉 短 消息 号 码 前 的 86 
{ 


strNumber=strNumber .Mid(2); 
} 
int nItemCount=ListCtrl.GetItemCount () ;// 最 多 保留 200 条 短 消息 
if(nItemCount >=200) 
{ 
ListCtrl.DeleteItem(0); // 删 除 短 消息 
nItemCount——; // 列 表 索 引 自 减 
E 
Listctrl.InsertItem(nItemCount，strNumber); // 插 入 新 消息 
ListCtrl.SetItemText (nItemCount, 1, strTime); 
ListCtrl.SetItemText (nItemCount, 2, strContent); 
ListCtrl.EnsureVisible (nItemCount, FALSE); 
} 


用 户 通 过 上 面 的 程序 段 ， 不 仅 将 短 消息 中 的 多 余 信 息 删 除了 ， 而 且 还 将 精简 后 的 短信 
显示 在 程序 界面 的 列表 控件 中 。 


外 注意 : 请 用 户 参 考 随 书 光盘 中 的 实例 代码 进行 学 习 ， 并 且 可 以 对 光盘 中 的 实例 代码 进行 
修改 达到 学 习 的 最 佳 目的 。 


本 节 主 要 向 用 户 详细 讲解 了 实例 中 一 些 重 要 的 代码 或 步 又。 希望 用 户 通过 本 章 的 学 习 
能 够 掌握 将 计算 机 与 其 他 硬件 设备 进行 结合 编程 的 基本 方法 。 同 时 ， 用 户 也 可 以 在 学 习 的 
过 程 中 ， 通 过 其 他 专业 书籍 对 短信 猫 的 硬件 结构 或 AT 指令 进行 更 为 详细 的 学 习 。 这 样 ， 
对 于 本 章 实例 的 学 习 会 起 到 很 好 的 帮助 。 


14.8 人 小 结 


通过 本 章 的 学 习 ， 用 户 对 于 使 用 短信 猫 与 PC 相 结合 实现 短 消 息 发 送 功能 的 原理 与 功 
能 代码 编写 的 相关 知识 应 该 有 一 个 非常 清晰 的 认识 。 用 户 可 以 在 本 章 实例 代码 中 ， 进 行 自 
定义 功能 的 代码 编写 等 。 这 样 ， 用 户 将 对 本 章 的 相关 知识 点 可 以 达到 很 好 的 学 习 效 果 。 实 
例 代码 请 用 户 参考 随 书 光盘 中 的 相应 小 节 。 
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